for (qw(01_Test
        02_Tester
        10_irgendwas
        42_schoenes.Beispiel
       )
    )
{
    if (m~^(?:\d{2}_)?\w+$~) {
        print "'$_' passt :)\n";
    }
    else {
      print "'$_' enthält eine Endung oder ist ungueltig :-(\n";
    }
}