package main; use strict; use warnings; use v5.8; use POSIX qw[ _exit ]; use threads; sub GetIt2 { require LWP::Simple; return LWP::Simple::get( $_[0] ); } #print GetIt2( $ARGV[ 0 ] ); #print threads->create( \&GetIt2, $ARGV[ 0 ] )->join; #_exit(0);