use LWP::Simple; use File::Compare; use HTML::TreeBuilder::XPath; use LWP::UserAgent; sub domain_check { sub domain_check { if($domain eq 'goo.eu') { $competitor = 'goo.eu'; $xpath ='//p/strong' } if ($domain eq 'mov.it') { $competitor = 'mov.it'; $xpath = '//div//table//td'; } elsif ($domain eq 'lot.it') { $competitor = 'lot.it'; $xpath = '//div//table'; } }