no Leading::Zeros; my $tries = 0; # Okay, not an octal constant my $ID_number = 000013; # Bad octal! No execution! print "[Attempt $tries] ID: $ID_number\n";