Thread Elegante Syntax für Hash-Def
(11 answers)
Opened by bianca at 2010-03-27 12:41
Guten Tag!
Habe hier ein zweidimensionales Hash zu definieren für eine Tabelle. Meine Syntax gefällt mir nicht, ich bin überzeugt, es gibt in Perl schönere und vor allem kürzere Methoden. Code (perl): (dl
)
1 2 3 4 5 6 7 8 #!/usr/bin/perl -w use strict; use warnings; use Data::Dumper; my %tabelle; $tabelle{head}{(keys %{$tabelle{head}}) + 1} = 'foo'; $tabelle{typ}{(keys %{$tabelle{typ}}) + 1} = 'N'; $tabelle{head}{(keys %{$tabelle{head}}) + 1} = 'bar'; $tabelle{typ}{(keys %{$tabelle{typ}}) + 1} = 'A'; print Dumper(%tabelle); Wie kann man das eleganter schreiben? Danke 10 print "Hallo"
20 goto 10 |