Help for this page

Select Code to Download


  1. or download this
      if (ref($ref) eq 'HASH') {
    # ... some code ...
...
    }
    # ... some more code ...
  }
  2. or download this
    --
@/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/;
map{y/X_/\n /;print}map{pop@$_}@/for@/