Help for this page

Select Code to Download

Select or download this

my ($var1, $var2) = 
  reverse # reverse order of split strings
...
  map {scalar reverse} # reverse characters
  qq(www,google,yahoo,345) # string
;

Select or download this

# perl -le'print for reverse map {scalar reverse} map { split(/,/, $_,
+ 2) } map {scalar reverse} qq(www,google,yahoo,345);'
www,google,yahoo
345