> perl -w tmp.pl
Too many arguments for main::egal at ..\tmp.pl line 7, near ""7006")"
Execution of ..\tmp.pl aborted due to compilation errors.