Opened by J-jayz-Z at 2005-09-11 04:00
User since
2003-08-04
5246 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-04
5246 Artikel
ModeratorIn
was ich nicht verstehe:
so wie ich perl verstehe, wird sowohl bei der for-schleife (egal, ob vor oder nachgestellt) als auch bei map $_ automatisch mit einem local versehen, also duerften sich die beiden $_ nicht ins gehege kommen.
Da auch nirgendwo ein $_ veraendert wird, duerfte sich auch %hash nicht veraendern. von woher kommt $hash{''} = [] ? (habe es auch anders validiert, nicht nur via Data::Dumper, aber das ist am kuerzesten). Das verstehe ich nicht.
ich denke, das waere mal ein fall fuer einen debugger bzw sogar eine debug-version von perl... hat da jemand zeit&lust? ich muesste mich da erst wieder einarbeiten...
aber momentan tendiere ich schon ganz schoen in richtung bug.\n\n
<!--EDIT|Strat|1126610206-->
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
use strict;
use warnings;
use Data::Dumper;
my %test = (
eins => ['Hallo', 'Perl', 'Community'],
zwei => ['Hallo', 'Programmierer']
);
map { print $_ . "\n" for(@{ $test{$_} }) } (keys %test);
print Dumper(\%test);
^D
Hallo
Perl
Community
$VAR1 = {
'' => [],
'eins' => [
'Hallo',
'Perl',
'Community'
],
'zwei' => [
'Hallo',
'Programmierer'
]
};
so wie ich perl verstehe, wird sowohl bei der for-schleife (egal, ob vor oder nachgestellt) als auch bei map $_ automatisch mit einem local versehen, also duerften sich die beiden $_ nicht ins gehege kommen.
Da auch nirgendwo ein $_ veraendert wird, duerfte sich auch %hash nicht veraendern. von woher kommt $hash{''} = [] ? (habe es auch anders validiert, nicht nur via Data::Dumper, aber das ist am kuerzesten). Das verstehe ich nicht.
ich denke, das waere mal ein fall fuer einen debugger bzw sogar eine debug-version von perl... hat da jemand zeit&lust? ich muesste mich da erst wieder einarbeiten...
aber momentan tendiere ich schon ganz schoen in richtung bug.\n\n
<!--EDIT|Strat|1126610206-->
perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/
http://www.fabiani.net/