Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"

Re: avoid uninitialized values for $_

by lima1 (Curate)
on Nov 06, 2007 at 12:34 UTC ( #649198=note: print w/replies, xml ) Need Help??

in reply to avoid uninitialized values for $_

If you just want to avoid the warnings, you can always inhibit them with no warnings. See perllexwarn.
use warnings; .. # in the block no warnings qw(uninitialized);
Are you aware that skipblanks() does not iterate over @data? The following code should do the same as your function:
sub skipblanks { # my @data = @_; # you probably want $x = shift || 0; my $x = shift; # foreach $x (@data) { if ($x) { $x =~ s/,/\./g; } return $x; # } }

Replies are listed 'Best First'.
Re^2: avoid uninitialized values for $_
by GertMT (Friar) on Nov 06, 2007 at 12:51 UTC
    thanks for your reply,
    Very good for pointing me to that guess I shoud have used 'next' or something like that. With your proposed improved skipblanks() it seems to work better! I keep the other suggestion 'no warnings' as a reserve. Thanks,

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (4)
As of 2021-04-15 06:13 GMT
Find Nodes?
    Voting Booth?

    No recent polls found