diff options
-rwxr-xr-x | sboupgradex | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sboupgradex b/sboupgradex index 1572eab..f91995b 100755 --- a/sboupgradex +++ b/sboupgradex @@ -144,7 +144,7 @@ sub ask_opts ($) { my $kv_regex = qr/[A-Z0-9]+=[^\s]+(|\s([A-Z]+=[^\s]+){0,})/; my $opts = &$ask; return unless $opts; - FIRST: while ($opts !~ $kv_regex) { + while ($opts !~ $kv_regex) { warn "Invalid input received.\n"; $opts = &$ask; } |