Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much

Storable::dclone breaking compiled regular expressions

by aufflick (Deacon)
on Nov 01, 2005 at 04:31 UTC ( #504486=perlquestion: print w/replies, xml ) Need Help??

aufflick has asked for the wisdom of the Perl Monks concerning the following question:

What the title says - anyone hit this before? The Storable docs (perl 5.8.5) don't say anything about it.

psh% print Dumper $foo $VAR1 = { 'bar' => qr/(?-xism:bar)/ }; psh% $foo2 = Storable::dclone $foo psh% print Dumper $foo2 $VAR1 = { 'bar' => qr/Regexp=SCALAR(0x8df0b40)/ };
The main store/restore functionality works fine with compiled regexes - I would have thought that dclone uses the same code? How does anyone else do deep cloning of hashes?

Replies are listed 'Best First'.
Re: Storable::dclone breaking compiled regular expressions
by BrowserUk (Pope) on Nov 01, 2005 at 04:56 UTC

    Try Clone, it doesn't appear to exhibit the same limitation:

    P:\test>p1 perl> use Clone qw[clone];; perl> $foo = { bar => qr[bar] };; perl> print Dumper $foo;; $VAR1 = { 'bar' => qr/(?-xism:bar)/ }; perl> $foo2 = clone $foo;; perl> print Dumper $foo2;; $VAR1 = { 'bar' => qr/(?-xism:bar)/ };

    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    Lingua non convalesco, consenesco et abolesco. -- Rule 1 has a caveat! -- Who broke the cabal?
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://504486]
Approved by Tanktalus
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (4)
As of 2021-12-01 07:38 GMT
Find Nodes?
    Voting Booth?

    No recent polls found