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 ) { ... }