Help for this page
sub debug { warn join '', map $_ // '<undef>', @_, "\n"; ... # and then... debug "x=", $x, " y=", $y;
sub debugf { my $fmt = shift; ... } debugf "x=%s y=%s", $x, $y; # <-- always using %s!
www.com | www.net | www.org
No recent polls found