Select Code to Download

use Encode      qw( decode encode );
use LWP::Simple qw( get );
...
my $chars      = decode($web_enc, $web_octets);
my $out_octets = encode($out_enc, $chars);
print($out_octets);

use LWP::UserAgent qw( );

...
my $response = $ua->get($URL);
my $chars    = $response->decoded_content(default_charset => 'UTF-8');
print($chars);

use LWP::UserAgent qw( );

...
   default_charset => $default_web_enc,
);
print($chars);