in reply to Scrapper outputing error -w

$content = get('http://example.com/$device');

If you want to interpolate the contents of $device, you need double quotes.

In Section Seekers of Perl Wisdom