Perl Problem mit Hashes

[Alexander Reelsen]

Moin

Ich habe mal wieder ein kleines perl problem (wie immer eigentlich)...

Also, folgender Code (haschfrei) funktioniert wie ich mir das denke:

sub ca { $tmp = $_[0] ; $$tmp++};
$nr = 5;
&ca \$nr;
print "$nr\n"

Spuckt wie gewuenscht "6" bei mir aus. jetzt wollte ich eigentlich das
selbe mit einem Hash machen, funktioniert aber nicht. Gedacht hatte ich
mir das so:

sub ca { %tmp = %{$_[0]} ; ${$tmp}{i}++ };
$id{i} = 5 ;
ca \%id;
print "$id{i}\n"

Das Problem ist, dass "${$tmp}{i}++" keine Änderung im Hash bewirkt. Wie
also hat dieser Aufruf zu lauten. Oder habe ich mich irgendwie verrannt
und das ganze funktioniert so gar nicht, oder habe ich schlichtweg was
uebersehen?


MfG/Regards, Alexander

-- 
Alexander Reelsen   http://joker.rhwd.de
ref at linux.com       GnuPG: pub 1024D/F0D7313C  sub 2048g/6AA2EDDB
ar at rhwd.net         7D44 F4E3 1993 FDDF 552E  7C88 EE9C CBD1 F0D7 313C
Securing Debian:    http://joker.rhwd.de/doc/Securing-Debian-HOWTO