$ perl -MStorable -le 'print $Storable::VERSION, " ", $^V'
2.25 v5.10.0
$ perl -MStorable -le 'store { x => qr/x/ }, "/tmp/x"; $x = retrieve "/tmp/x"; print $x->{x}'
Regexp=SCALAR(0x10082e9f0)
$ perl -MStorable -le 'store { x => qr/x/ }, "/tmp/x"; $x = retrieve "/tmp/x"; print qq{!${$x->{x}}!}'
!!