Select Code to Download

seek(STDOUT, -0, 2) or die $!;
print STDOUT "abc\n";

$ cat a.pl
use Devel::Peek;
...
-Process 4028 detached
+exit_group(0)                           = ?
+Process 4032 detached