Help for this page

Select Code to Download

Select or download this

$substr = sub {
   if (@_ == 2) {
...
};

print($substr->('abc', 1), "\n");