Help for this page

Select Code to Download


  1. or download this
    s/\b(?!(?:if|then|else)\b)(\w+)/\$self->\{$1\}\{val\}/g
  2. or download this
    my %stopwords = map {$_ => qr/\B/} qw(if then else);
s/\b(\w+)\b(??{ $stopwords{$^N} or qr[] })/\$self->\{$1\}\{val\}/g
  3. or download this
    @/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/;
map{y/X_/\n /;print}map{pop@$_}@/for@/