Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

(crazyinsomniac) Re^2: Always Follow Up on Warnings

by crazyinsomniac (Prior)
on Feb 08, 2002 at 04:00 UTC ( #144026=note: print w/replies, xml ) Need Help??

in reply to Re: Always Follow Up on Warnings
in thread Always Follow Up on Warnings

Speaking of idioms, I never use one for this type problem, but here is a more idiomatic solution (if u ask me)
#!/usr/bin/perl -wT use strict; my ($x,$y,$z) = (undef,'hello',undef); $_ ||='' for $x,$y,$z; print "x='$x' y='$y' z='$z'\n"; ## OR EVEN (most idiomatic imho) $_||='' for my($a,$b,$c)=(undef,9,undef); print "a='$a' b='$b' c='$c'\n";
Happy Coding!

Of all the things I've lost, I miss my mind the most.
perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"

Replies are listed 'Best First'.
Re: (crazyinsomniac) Re^2: Always Follow Up on Warnings
by redsquirrel (Hermit) on Feb 08, 2002 at 05:33 UTC
    The problem with $_ ||= '' is that it turns 0's into ''. defined is much less cool, but definitely more effective.


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://144026]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (6)
As of 2017-04-26 01:42 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (466 votes). Check out past polls.