Merge pull request #284 from mknos/tail-checknum

tail: check_number() too forgiving
briandfoy · Oct 10, 2023 · f873ba0 · f873ba0
2 parents c519395 + 10e79a2
commit f873ba0
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/bin/tail b/bin/tail
@@ -55,12 +55,12 @@ my $block_size = 512;
 sub check_number($)
 {
     my $opt = shift;
-    if ($opt =~ /\+(\d+)$/) {
-    return $1+0;
-    } elsif      ($opt =~ /-?(\d+)$/) {
-    return -($1+0);
+    if ($opt =~ m/\A\+(\d+)\Z/) {
+        return $1+0;
+    } elsif ($opt =~ m/\A\-?(\d+)\Z/) {
+        return -($1+0);
     } else {
-    usage(1);
+        usage(1, "invalid number '$opt'");
     }
 }