summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl.straw/lib/Test/Deep/RegexpVersion.pm
blob: 6cbfa857ffcc9f76882e53ea39dadd12aa682c0e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
use strict;
use warnings;

package Test::Deep::RegexpVersion;

use vars qw( $OldStyle );

# Older versions of Perl treated Regexp refs as opaque scalars blessed
# into the "Regexp" class. Several bits of code need this so we
# centralise the test for that kind of version.
$OldStyle = ($] < 5.011);

1;