[vienna.pm] scalar(Hash)

[Peter J . Holzer]

Kleines Rätsel:

Was gibt 

#!/usr/bin/perl -w
use strict;
my %x;

for (1..$ARGV[0]) {
    $x{$_} = $_;
}
print scalar(%x), "\n";

für diverse Werte von $ARGV[0] aus, und warum?

	hp

-- 
   _  | Peter J. Holzer      | My definition of a stupid question is
|_|_) | Sysadmin WSR / LUGA  | "a question that if you're embarassed to
| |   | hjp at wsr.ac.at        | ask it, you stay stupid."
__/   | http://www.hjp.at/   |    -- Tim Helck on dbi-users, 2001-07-30
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 431 bytes
Desc: not available
Url : http://mail.pm.org/archives/vienna-pm/attachments/20011018/7f219d91/attachment.bin