or download this
diff -u basicinterpreter.pl basicinterpreter_fixed.pl
--- basicinterpreter.pl 2021-08-11 15:51:20.359658237 +0200
+++ basicinterpreter_fixed.pl 2021-08-11 16:01:08.724748447 +0200
...
next if /^#/;
my ($lineNum, $line) = /^(\d+)\s+(.*)/;