Hjälp med regexp..

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

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]

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!

You're welcome :)

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*

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

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