foreach $_ ( @msgs ) {
           ($msgnum,$date,$flags) = split(/\|/, $_);
           $message = fetchMsg( $msgnum, $srcmbx, $src );
           next unless $message;
           $copied++ if insertMsg( $dst, $dstmbx, *message, $flags, $date);

           #lösche die aktuelle email nach dem kopieren von src server
           deleteMsg( $srcmbx, $msgnum, $src );
        }