use utf8;
use LWP::Simple;
use WWW::Mechanize;


.....


$browser = WWW::Mechanize->new(
	stack_depth => 0,      # infinite History
	timeout     => 180,    # Network inactivity
	autocheck   => 1,      # auto die on errors
	quiet       => 1,
);

$browser->add_header( 'User-agent' => 'Mozilla/5.0 (Windows; U; Windows NT 6.1; nl; rv:1.9.2.13) Gecko/20101203 Firefox/3.6.13');
$browser->add_header( Encoding => 'text/UTF-8' );
$browser->add_header( Referer => undef );
$browser->get( $sURL );

$sContent = $browser->content();

$sEncodingName = Encode::Detect::Detector::detect($sContent);

if ( $sEncodingName eq "UTF-8" ) {
						
open FILE, '>:utf8', $ziel or die "$ziel: $!";
print FILE $sContent;
close(FILE);
}