"ist Zahl durch 11 teilbar" - Prüfung

[Peter Kaufmann]

Hallo Torwächter,

Wie kann ich Perl testen lassen, ob eine Zahl (nennen wir sie mal $zahl) durch 11 teilbar ist ?

z.B. mit  Modulo:

if ($zahl % 11 == 0) {
  print "$zahl ist durch 11 teilbar\n";
} else {
  print "$zahl ist nicht durch 11 teilbar\n";
}

Ich habe es versucht mit:
if($zahl =~ /./)
{
}
else
{
}

denn Ansatz verstehe ich _überhaupt_ nicht.

Grüße Peter