C:\>echo >1
C:\>perl -MCGI::Carp=carpout -MCGI=:standard -e"carpout(STDOUT);print start_html;warn 1;print end_html;" >>1
C:\>perl -MCGI::Carp=carpout -e"carpout(STDOUT);warn 2; die 3" >>1
C:\>more 1
ECHO is on.
[Tue Sep 23 02:32:33 2008] -e: 1 at -e line 1.
Untitled Document
[Tue Sep 23 02:32:36 2008] -e: 2 at -e line 1.
[Tue Sep 23 02:32:36 2008] -e: 3 at -e line 1.
C:\>