diff --git a/.github/calcrom/calcrom.pl b/.github/calcrom/calcrom.pl
index 2aaf25c436..c351c76122 100755
--- a/.github/calcrom/calcrom.pl
+++ b/.github/calcrom/calcrom.pl
@@ -5,14 +5,14 @@ use Getopt::Long;
 
 my $usage = "Usage: calcrom.pl file.map [--data]\n";
 
-(@ARGV >= 1)
+my $showData;
+GetOptions("data" => \$showData) or die $usage;
+
+(@ARGV == 1)
     or die $usage;
 open(my $file, $ARGV[0])
     or die "ERROR: could not open file '$ARGV[0]'.\n";
 
-my $showData;
-GetOptions("data" => \$showData) or die $usage;
-
 my $src = 0;
 my $asm = 0;
 my $srcdata = 0;