2013-05-07T18:16:00 pq

und was sagt:

Code (perl): (dl )

1
2
3
4
5
6
7

use 5.010;
my %FORM = ( a => "abc", b => "defg" );
say for %FORM;
say join "", %FORM;
my $x = length join "", %FORM;
say $x;
say length join "", %FORM;

?

Quote

a
abc
b
defg
aabcbdefg
9
9

Du, ich glaube ich spinne langsam. Jetzt bekomme ich mit do { no warnings; length join "", %FORM } auch die 5 von vorhin nicht mehr reproduziert. Langsam drehe ich komplett durch. Bin mir 100 % sicher, dass da vorhin 5 stand. Aber jetzt nicht mehr.
Habe genau das Script von vorhin leider nicht mehr.