miten perl tulostaa tiedostossa olevat linkit HTML-muotoon?
Perliä
mkk
2152
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Turvaa tilisi vahvistamalla puhelinnumerosi. Voit silloin palauttaa unohtuneen salasanan tekstiviestillä.
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 2
Vanhimmat
missä muodossa ne linkit on siellä sun tiedostossa.
lue eka tiedosto taulukkoon:
$tiedosto = "linkit.txt";
open(DATA, $tiedosto) || die("Tiedosto ei aukea!");
@linkit = ;
close(DATA);
foreach $linkki {@linkit}
{
chop($linkki);
print
Ylläolevan saa tehtyä yhdelläkin rivillä:
(Forum saattaa pätkiä tämän monelle riville, joten muista kirjoittaa tämä kokonaisuudessaan samalle riville.)
perl -MCGI -wnl -e '$linkki=CGI->escapeHTML($_);print "$linkki"' tiedosto1 tiedosto2 ...
jossa tiedosto1 jne. sisältää ne linkit. Tämän toimivuus vaatii CGI-modulin. Bonuksena tämä käsittelee myös erikoismerkit, jotka pitää muuntaa (esim. ääkköset). Lopputuloksen saa ohjattua toiseen tiedostoon (ainakin unix-shelleissä) laittamalla lauseen perään "> tulostiedoston_nimi_tähän".