[p5sagit/p5-mst-13.2.git] / ext / re / t / qr.t

#!./perl

BEGIN {
	require Config;
	if (($Config::Config{'extensions'} !~ /\bre\b/) ){
        	print "1..0 # Skip -- Perl configured without re module\n";
		exit 0;
	}
}

use Test::More tests => 1;
use re 'Debug';
isa_ok( qr//, "Regexp" );
Commit	Line	Data
192b9cd1	1	#!./perl
	2
	3	BEGIN {
192b9cd1	4	require Config;
	5	if (($Config::Config{'extensions'} !~ /\bre\b/) ){
	6	print "1..0 # Skip -- Perl configured without re module\n";
	7	exit 0;
	8	}
	9	}
	10
	11	use Test::More tests => 1;
	12	use re 'Debug';
	13	isa_ok( qr//, "Regexp" );