Skip to content

Instantly share code, notes, and snippets.

@squadette
Created December 3, 2017 11:36
Show Gist options
  • Save squadette/cafffdd4028a0a4d5e4fdde0268b7cbc to your computer and use it in GitHub Desktop.
Save squadette/cafffdd4028a0a4d5e4fdde0268b7cbc to your computer and use it in GitHub Desktop.
--- ParamVal.pm.orig 2017-12-03 12:34:53.000000000 +0100
+++ ParamVal.pm 2017-12-03 12:35:30.000000000 +0100
@@ -257,7 +257,9 @@
$badtoken =~ /^($TOKEN)*/;
$badtoken = $1;
# Cut it off at first whitespace too
- $badtoken =~ s/\s.*//;
+ if (defined $badtoken) {
+ $badtoken =~ s/\s.*//;
+ }
}
$val = defined($qstr) ? $qstr :
(defined($enctoken) ? $enctoken :
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment