stratum by jonathan camacho

$a=reverse(<>);
for(1 .. length($a)){
  $b=substr($a,0,$_);
  print(scalar(reverse $b) . $b . $/)
}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page