File opening problem

Hi all!

i'm running the following dummy program which just opens a file and I get an
error  (die message)

#!/usr/bin/perl


if (  @ARGV[0] eq '' )
{
    print "\nUSAGE:\n\t genenames.pl genes.txt \n\n";
    exit;
}

my $file = $ARGV[0];
open(FICH,"$file") or die "cannot open $file";

I've tried to pass the input parameter ARGV[0] with / with \ with relative
path ... but nothing

any idea?

Thanks a lot!
T