Salve a tutti, sto creando uno script in perl nel quale presi in input come argomenti un link ed un file di testo, ne legga il contenuto del file e concateni il link con ogni riga del file.
Il problema è che quando do il link e il file di testo il programma si chiude dicendo che il file non esiste. Questo è il pezzo di codice


if (@ARGV != 2) { print "Usage: ./file.pl www.site.com file.txt\n"; }



my $link = "$argv[1]";

my $file = "$argv[2]";



if($link !~ /http:\/\//) { $link = "http://".$link; }



open(FILE, "<$file") || die "$!";

In cosa sbaglio??
Grazie in anticipo :D

Hai verificato che non siano problemi di path?

Domande di riserva:
1. dove sta il file che devi aprire?
2. dove sta il programma perl?
3. dalla dir dove lavori, se fai una lista dei file (ls in unix, dir in windows) vedi il file da aprire, vedi il sorgente perl?
4. il file ha del conenuto? (oppure e` vuoto)