Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re^3: Uninitialized warnings trouble

by jwkrahn (Abbot)
on Dec 14, 2022 at 07:45 UTC ( [id://11148855]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Uninitialized warnings trouble
in thread Uninitialized warnings trouble

$new .= "\n" while s/.$/ $new .= $&; '' /gem;

Did you test this?

$ time perl -e' use Data::Dumper; $Data::Dumper::Useqq = 1; my $x = "123456789\n"; print Dumper $x; my $new = ""; $new .= "\n" while $x =~ s/.$/ $new .= $&; '' /gem; print Dumper $new; ' $VAR1 = "123456789\n"; Out of memory! real 1m54.230s user 0m3.216s sys 0m9.332s

BTW, my system has 32GB of RAM     ouch!

Sorry, my mistake was leaving in the single quotes, oops.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://11148855]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others chanting in the Monastery: (3)
As of 2024-04-25 05:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found