use strict;
use Data::Dumper;
print "$]\n", Dumper([qw[ \\d ]]), "\n";