wls_experimental.pl

#!/usr/bin/perl
#Experimental version of wls.pl (http://pastebin.com/jdeMVw9u) for grabbing both HTML *and* images (and other stuff too).  It should work, except that it will spider across multiple Spaces and end up downloading everything.  If you know how to fix this, go ahead.

die("Usage: wls_experimental.pl \"<URL(s)>\" [wait]\n") unless ($ARGV[0]);

my $waitTime = 1;
$waitTime = $ARGV[1] if ($ARGV[1]);

system("wget --mirror --page-requisites --continue --convert-links --user-agent=\"\" -e robots=off --span-hosts --exclude-domains=api.live.net,login.live.com --ignore-length --wait $waitTime $ARGV[0]");