webForumDet fria alternativet

Hjälp med regexp..

Perl & Ruby

6 svar · 404 visningar · startad av Joakim

Medlem sedan dec. 199982 inlägg
Frågan#1

Tjo

Behöver lite hjälp med ett regexp.
FSData använder wusage5 för statistik och jag vill göra ett script som hämtar antalet sidvisningar från wusage's statistiksida.

Eftersom lägger scriptet på samma konto kan jag öppna filen nedan och lägga den som en variabel i scriptet utan problem.

Sidan som är aktuell kan beskådas här:
http://www.rstdata.se/wusage5/index.html

Det jag vill åt är värdet under "Total Accesses" i den undre tabellen.

Detta är en sida som uppdateras veckovis och de flesta värden ändras ju då vilken måste beaktas i regexp'et.

Men men, kan nån hjälpa mig skulle jag bli ruskigt glad.

Trevlig helg!

// Joakim

Medlem sedan juni 20004 308 inlägg
#2

Om vi tänker oss att du har läst in filen till variabeln $data så kan du använda;

@td=$data=~/<td align=\"right\">(.*?)<\/td>/gi;

Så har du värdet du vill ha i $td[6]

Medlem sedan dec. 199982 inlägg
#3

Man tackar! Var inne på det spåret men var för trött och tog den enkla varianten, att fråga här. Stort tack iallafall!

Medlem sedan juni 20004 308 inlägg
#4

You're welcome :)

Medlem sedan dec. 199982 inlägg
#5

Nu är Joakim förvirrad =)

Laddade upp scriptet och fick inget värde och börjar felsöka. Ser då att $data bara innehåller första raden av index.html. Vad sjutton beror detta på?

Öppnar på följande sätt:

open(DATA2,"SÖKVÄG/index.html") || die "Kan inte öppna filen: $!\n"; 
$data = <DATA2>;
close(DATA2);

Är iofs för trött för djupa analyser nu, men har inte var med om detta innan. Kan det finnas nåt skräptecken eller dyl i index.html som behöver tas bort? *förvirrad*

Medlem sedan juni 20004 308 inlägg
#6

Eftersom du kan hantera filhandtaget som en array blir det;

$data=join('',<DATA2>);

På samma sätt som du kan använda

foreach $thisline (<DATA2>){
#...osv
Medlem sedan dec. 199982 inlägg
#7

det var ju inte så svårt =) du är en klippa!

256 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)
121 ms — ändringar (db)