#!/usr/bin/perl 
use strict;
use warnings;
use LWP::Simple;

my $ausgabe_datei = "ausgabe.txt";
my $url = "http://de.wikipedia.org/wiki/Perl_(Programmiersprache)";

open (my $fh, '>', $ausgabe_datei) or die( "ERROR OPEN $ausgabe_datei : $!" );

my $wiki=get($url);

print $fh $wiki;
close($fh);