Help for this page

Select Code to Download

Select or download this

$ perl -d:Modlist -e "use CGI;"
CGI                    3.51
...
vars                   1.01
warnings               1.06
warnings::register     1.01

Select or download this
syswrite $self->{file}, $tf, length($tf) - (BLOCK * 2);