typester/gist:118416

## gistfile1.txt
#!/usr/bin/env perl

use strict;
use warnings;

use YAML::XS;
use Storable qw/freeze thaw/;

my $re  = qr/test/;
my $re2 = thaw freeze $re;

warn Dump $re;                  # => --- !!perl/regexp (?-xism:test)
warn Dump $re2;                 # => --- !!perl/scalar:Regexp ~
	#!/usr/bin/env perl

	use strict;
	use warnings;

	use YAML::XS;
	use Storable qw/freeze thaw/;

	my $re = qr/test/;
	my $re2 = thaw freeze $re;

	warn Dump $re; # => --- !!perl/regexp (?-xism:test)
	warn Dump $re2; # => --- !!perl/scalar:Regexp ~