blob: 5f1e6f3c79aef9d32523bab47d981dd6b6c1e80a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
#!./perl
#
# This is the test subs used for regex testing.
# This used to be part of re/pat.t
use warnings;
use strict;
use 5.010;
use base qw/Exporter/;
use Carp;
$| = 1;
require './test.pl';
1;
|