Way OT: HTML script

If you can find a program/script to do the searching, you can get CronNT (not the one that ships with MS rescource kits) to do the scheduling if you google. The one I'm thinking of runs as a service on NT systems and uses a standard crontab file to run.

Perl on windows should be able to search the web page too.

Ta.

The cron behaviour is probably the easy bit. I guessed an answer to the screen scrape bit would probably involve Perl but anyone who's ever seen my code knows that's isn't going to happen this side of the millennium. Hoped there might be a pre-packaged solution out there.....

Well, if you go and install Perl from here (easy to install, just accept the defaults for everything!):

##### start code #####

# --- VARIABLES --- #

# url to stats page - replace user & pass with the router username & password my $url = 'http://user:password@192.168.0.1/setup.cgi?next_file=stattbl.htm'; # output file my $log = 'd:/router-stats.txt';

# --- PROGRAM --- #

# connect to router and get raw html use LWP::UserAgent; my $ua = new LWP::UserAgent; my $req = HTTP::Request->new(GET => $url);my $response = $ua->request($req);my $html = $response->content; # get date/time & format my ($sec, $min, $hour, $mday, $mon, $year) = localtime(time()); my $dt = sprintf("%04d%02d%02d%02d%02d",1900+$year,$mon+1,$mday,$hour,$min);

# extract statistic $html =~ s/(\s|\n)+//g; my($stat) = $html =~ m!NoiseMargin[^&]+ dB([^&]+)!;

# print to file open(FH,">>$log"); print FH "$dt $stat\n"; close(FH);

##### end code #####

then change the $url and $log variables accordingly. (Note forward slash in path to stats file is deliberate and take care to preserve the format of the url)

then setup windows task manager to run "c:/perl/bin/perl.exe d:/whereeveryouputtheperlscript/stats.pl" (assuming perl installed to drive c:)

that should then work providing the html code you gave is exact, and providing you don't bugger up the syntax anywhere in the code, url, etc

:-)

Bigus

Had that already for MRTG...

Woohoo!

If you have a paypal account, let me know the email address and I'll gladly buy you a non-virtual pint. Ignore my reply-to, use urcm at grantm.clara.co.uk.

In article , snipped-for-privacy@noisyfan.com spouted forth into uk.rec.cars.modifications...

I knew Perl would be the quick way, but I never thought anyone would knock up the answer so quickly.

cool.. glad you got it working

thanks for the offer, but a virtual pint will do :)

Bigus