my @urls = qq("http://www.woot.com", "http://www.shopping.yahoo.com");

my %stored_data;
foreach my $page (@urls)
{
   my $source = get($page);
   $stored_data{$page} = $source;
   print "loaded and saved $page\n";
}