#! perl -slw use strict; use LWP::Simple; while( <> ) { chomp; my $content = get $_; ### do something with it. }