gnu/usr.bin/perl/ext/re/t/qr.t


1
2
3
4
5
6
7
8
9
10
11
12

#!./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;
isa_ok( qr//, "Regexp" );