PDA

Visualizza la versione completa : Argomenti in perl


G0ld3n dr4g0n
26-09-2011, 18:33
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

Mich_
14-11-2011, 11:38
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)

Loading