Automating all scrapes using Perl