PDA

Visualizza la versione completa : lista contenuto dir


novembre
18-02-2004, 12:02
avrei bisogno di uno script perl che mi lista in una pagina html i file contenuti in una directory (con il link al file)

potete aiutarmi? :)

novembre
18-02-2004, 12:57
Originariamente inviato da novembre
avrei bisogno di uno script perl che mi lista in una pagina html i file contenuti in una directory (con il link al file)

potete aiutarmi? :)

piccolo miglioramento

foreach (<nicola/*>) {
print @nicola, $_ if -f;
}

mi stampa il contenuto della dir nicola tutto di seguito in una riga, come vado a capo ogni parola?

se volessi visualizzare invece il contenuto di un file txt che si trova dentro la dir che devo fare?

shishii
20-02-2004, 20:43
Ciao,

per andare a capo prova:

foreach (<nicola/*> ) {
print @nicola, $_ if -f;
print "\n";
}

per leggere il contenuto del file text dipende se vuoi leggere il contenuto di uno specifico file, o quello di tutti.

novembre
21-02-2004, 10:59
Originariamente inviato da shishii

per leggere il contenuto del file text dipende se vuoi leggere il contenuto di uno specifico file, o quello di tutti.

grazie dell'aiuto :)

il file di testo mi servirebbe per associare il nome dei file contenuti nella dir ai titoli dei documenti, inoltre dovrebbe esserci anche il link al file :master:

shishii
21-02-2004, 11:57
sinceramente non ho capito.

novembre
21-02-2004, 14:10
Originariamente inviato da shishii
sinceramente non ho capito.

ehhhmmm, scusa per l'imprecisione :fagiano:

la pagina html dovrebbe contenere la lista dei file presenti (e questo fatto) e affianco al file il titolo dello stesso:

documento1.pdf - titolo del documento pdf

shishii
21-02-2004, 22:44
Ciao,

forse ho capito. Ti serve un file di indice che abbini il nome del file ad un titolo.

se cos basta creare (in manuale o automatico) un file di testo di questo tipo:

primo.pdf:Questo il primo file
secondo.gif: questa invece un'immagine

ammettendo che lo chiami elenco.txt, il codice per elaborarlo potrebbe essere:

open (FILE, "</$path/elenco.txt") || die "Non posso leggere /$path/elenco.txt: $!\n";
while (<FILE>) {
($key, $value) = split (/:/);
$files{$key} = $value;
}
close FILE;

in %files ti trovi le coppie nome file - titolo.

novembre
22-02-2004, 18:49
domani provo ad implementarlo, intanto ti ringrazio infinitamente :ciauz:

Loading