{time} aber nicht als Funktion sondern als Key

[hotti]

moin,

Test:

  
use strict;  
  
my %h;  
  
$h{time} = 1;  
  
while( my ($k, $v) = each %h){  
	print "$k => $v\n";  
}  
  
%h = ( time => 2 );  
  
while( my ($k, $v) = each %h){  
	print "$k => $v\n";  
}  

Bringt in beiden Fällen
time => 1
time => 2

Ergo ist Qoten wohl überflüssig, die Funktion time wird nicht gecallt.

Hotte