#!/usr/bin/perl -w

use strict;
use CGI::Carp qw(fatalsToBrowser);
use Crypt::SSLeay;
use WWW::Mechanize;
use HTML::TokeParser;

my $url = "http://www.myurl.de"; # here i tried nearly every url on
earth!

my $mech = WWW::Mechanize->new();

$mech->get($url);
my $file = "test.html";
$mech->save_content( $file );