open(my $fhFertig, "<Fertig.txt") or die $!;

while(<>) {

   print $fhFertig $_;

} # while

close($fhFertig) or die $!;