#!/usr/bin/perl -w
   use strict;
   use LWP::Simple;
   my @a = get("http://www.thewolfweb.com/");
   print "@a";

##</code><code>##

   my @a = get("http://www.thewolfweb.com/message.asp\?section\=6");