Hi Mosley,

You could try something like this to check for the size of the file before beginning download.

#!/usr/bin/perl -w

use strict;
use LWP::Simple;

my $url="http://localhost/index.html";
my $MAX_SIZE=50_000;

my ($content_type, $document_length, $modified_time, $expires, $server
+)=
             head($url);

if ($document_length>$MAX_SIZE){
    print "TooBig, Ignoring\n"
    }
else {
    my $dl=get($url);
    print $dl;
};
[download]

To Parse the html, I would suggest using HTML::Parser, but you don't wan't to use a module. Why constrain yourself so?
Anyway, Hope this helps,

thinker