Select Code to Download

#! perl
use strict;
...
print "AFTER:\n";
dd $doc;
print '-' x 30, "\n";

14:40 >perl 1673_SoPW.pl
BEFORE:
...
------------------------------

14:40 >