1use strict;
2use warnings;
3
4package Test::Deep::RegexpVersion;
5
6use vars qw( $OldStyle );
7
8# Older versions of Perl treated Regexp refs as opaque scalars blessed
9# into the "Regexp" class. Several bits of code need this so we
10# centralise the test for that kind of version.
11$OldStyle = ($] < 5.011);
12
131;
14