Vom elsif erschlagen....: Übersichtichere Möglichkeiten gesucht. - #63270 (Allgemeines zu Perl)

Strat

2003-10-14 14:36

User since
2003-08-04
5246 Artikel
ModeratorIn

wiki: switch

oder:

Code: (dl )

my %hash = ( 20 => 'zwanzig', 30 => 'dreissig', 40 => 'vierzig', ....);
my $x = 20;
if (exists $hash{$x}) {
  $x = $hash{$x};
} # if
else {
  print "Kein Wert gefunden\n";
} # else

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/