You can't make stuff up jeanluca :D Use strict warnings and diagnostics or die, How (Not) To Ask A Question

#!/usr/bin/perl --
use strict;
use warnings;
use Tie::IxHash;
my $r = new Tie::IxHash() ;
$r->Push( 'a' => 1 ) ;
die $r->FETCH('a');
__END__
1 at - line 7.
[download]