use Encode      qw( decode encode );
use LWP::Simple qw( get );

my $URL     = ...;
my $web_enc = 'UTF-8';
my $out_enc = 'iso-latin-1';

my $web_octets = get($URL);
my $chars      = decode($web_enc, $web_octets);
my $out_octets = encode($out_enc, $chars);
print($out_octets);