Help for this page

Select Code to Download


  1. or download this
    ...
    elsif ( ref($data) eq '' ) {
        $_[0] = $subref->($data);
    }
...
  2. or download this
    ...
    if ( ref($data) eq 'HASH' ) {
...
    }
...
# and the same for arrays