Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^2: disadvantages of perl

by Anonymous Monk
on Jul 02, 2009 at 14:34 UTC ( #776762=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    # WTF
    if ( defined $r && ref $r && ref $r eq 'HASH' && keys %$r ) { ... }
    
  2. or download this
    if( $r and UNIVERSAL::isa($r,'HASH') and %$r ) { ... }
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://776762]
help
Chatterbox?
[choroba]: As discussed in Using the DATA file handle for ARGV, I usually start my "fun" scripts with *ARGV = *DATA{IO} unless @ARGV;
[choroba]: this was just a remainder

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (6)
As of 2016-12-06 08:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (101 votes). Check out past polls.