Froschpopo+2007-12-28 09:44:47--

Code (perl): (dl )

1
2
3
4
5

my $hashref = sub {
    return int(rand(1000));
};
print $hashref->(),"\n";
print $hashref->(),"\n";  #ergibt dasselbe ergebnis wie beim ersten print()

also bei mir werden da zwei verschiedene zahlen ausgegeben. vielleicht ein
bug in deiner perl-version?
This is perl, v5.8.8 built for i486-linux-gnu-thread-multi