[MacPerl] MacPerl

[christian <wistar@lenet.fr>]

is there someone who can help me with this (may be simple) problem:

in my script I use this associative array that I define at the begining 
:
%FRANCE= ("12", "12", "24", "8","36", "6", "48","0","72","0")

Then, I want to assign on of its value to the variable $port :
$port=$FRANCE{$nombre};
where $nombre is define previously.

What is strange is that when I call $FRANCE{$nombre} i have the good 
number, but when i call $port i have always nothing...?
I can't assign any value to $port.

help me
Thanks, Christian