Help for this page
sub dequote { for (my $s = @_ ? $_[0] : $_) { ... print("error: $error\n"); print("code: $code\n"); }