A basic PERL webcrawler