#! perl -slw
use strict;
use LWP::Simple;
use Data::Dumper;
use URI;
use HTML::Form;


#folder where the file resides
my $base = URI->new("http://web.umr.edu/~msw/CS304/");

my $file = get('http://web.umr.edu/~msw/CS304/personal-info.HTML');

#try to parse the file, it only has 1 form
my $form = HTML::Form->parse($file, $base) || die("Parse failed");

print Dumper $form;