% perl -le'print "Good" if "NZ312000" !~ /^N.*?00$/' % perl -le'print "Good" if "NZ312005" !~ /^N.*?00$/' Good % perl -le'print "Good" if "NZ312050" !~ /^N.*?00$/' Good