while () {
     print 'Geben Sie die zu buchstabierende Zahl ein: ';
     chomp($num = <STDIN>);
     if ($num ne "0" && $num == 0) { # wenn $num ein String
     ... 
}