my $return = copy($datei1,$datei2);

if (! $return) {
  print "Copy failed!\n";

  #
  # Und noch was anderes...
  #
}