...
my $ua = LWP::UserAgent->new();

# your proxy ip address instead if '10.0.0.1':
$ua->proxy('http', 'http://10.0.0.1:8080');
...