Perl: Establishing a Connection
Establishing a Connection
$content = get("http://www.merrimack.edu");
while ($content =~ /<\s*([^\/].*?)>/gs) {
print "tag = $tag, attributes = $attributes\n";
This will print out all the tags on a page and their attributes (if any)