Select Code to Download

sub abc()
{
...
  abc();
  print "After:$_\n";
}

Before:1
  Before:4
...
  After:5
Mid:2
After:x