Elakadtam a splittel... (perl) Segitsetek pls surgos...
- 981 megtekintés
Hozzászólások
Persze, lehet s/// nelku is...
[code:1:895e838df0]...
$buf =~ /href="([^"]+)"/;
print $1;
...[/code:1:895e838df0]
Zsiraf
- A hozzászóláshoz be kell jelentkezni
Az a bajom hogy egy szovegbe (ami tobb sor) keresek 1 mondatott... az utana levot szeretnem kiszedni aminek a vege ". Na marmost ezt http rol szedem i es olvasom ki (net::HTTP)
use Net::HTTP;
my $s = Net::HTTP->new(Host => "www.origo.hu");
$s->write_request(GET => "/", 'User-Agent' => "Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.6) Gecko/20040113");
my $buf;
my $n = $s->read_entity_body($buf, 1024);
($k0, $k1) = split(!/987"> <br><a href="/, $buf);
($k3, $k4) = split(!/"/, $k1);
print($k3);
persze ez igy nem mukodhet sajnos ... De perl be kell megoldaom... itt viszont nincs crop csak split ... pls help me..
- A hozzászóláshoz be kell jelentkezni
Azt ugye bar sejtettem hogy a szavazasnak kb mi lesz az eredmenye de nem lehettne egy paar soros valasz a kerdesemre?:)
- A hozzászóláshoz be kell jelentkezni
1. Nézd meg a chomp fgv.-t dokumentációban....
2. szedd ki vele az újsort, utána működik a split...
( ez pontosan 1 pár sor :lol: )
- A hozzászóláshoz be kell jelentkezni
[quote:7f48752df1="Testa"]Az a bajom hogy egy szovegbe (ami tobb sor) keresek 1 mondatott... az utana levot szeretnem kiszedni aminek a vege ". Na marmost ezt http rol szedem i es
Amire neked szukseged van, aza mintaillesztes.(regex)
Elso ranezesre ez:
$buf =~ s/987"> <br><a href="([^"]+)".*/$1/m;
Ekkor a buf-ban mar csak a link "bele" lesz. Ha gond lenne, akkor man perlop, vagy man perlretut
- A hozzászóláshoz be kell jelentkezni