lappert2001 - 1:32 am on Feb 29, 2012 (gmt 0)

So I've put the original cgi-lib.pl back and commented out the two lines

sub PrintVariablesShort {
local (%in) = @_;
local ($old, $out, $output);
# $old = $*; $* =1;
foreach $key (sort keys(%in)) {
foreach (split("\0", $in{$key})) {
($out = $_) =~ s/\n/<BR>/g;
$output .= "<B>$key</B> is <I>$out</I><BR>";
}
}
# $* = $old;

return $output;
}

1; #return true