#!/usr/bin/perl

use strict;
use warnings;
use LWP::Simple;

my $url='http://www.test.de/';
my $body = get($url);

die "Download Fehlgeschlagen\n" unless defined $body;

print $body;