Opened by rosti at 2011-04-10 22:36
User since
2007-05-11
923 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
2007-05-11
923 Artikel
HausmeisterIn
Ungetested:
Die Idee ist, die Sonderbehandlung des letzten Elements aus der Schleife rauszuziehen, und in der Schleife auf Autovivification zu setzen.
Gruesse,
Moritz
Code (perl): (dl
)
1 2 3 4 5 6 7
use 5.010; # fuer //=, kann man aber auch vermeiden wenn man will my @a = qw(a b c d e); my %h; for (0..($#a-1)) { push @{$h{$a[$_]}}, $a[$_+1]; } $h{$a[-1]} //= [];
Die Idee ist, die Sonderbehandlung des letzten Elements aus der Schleife rauszuziehen, und in der Schleife auf Autovivification zu setzen.
Gruesse,
Moritz