Dann mach ichs so:
if ($zahl > 20) {
if ($zahl =~ /^(\d+)$/) {
$saubere_zahl = $1;
}
komische Vergleichsoperatoren hat Perl..... ist ja echt beschissen
Dann mach ichs so:
if ($zahl > 20) {
if ($zahl =~ /^(\d+)$/) {
$saubere_zahl = $1;
}
komische Vergleichsoperatoren hat Perl..... ist ja echt beschissen