Jemand

    try {
        $session->{store}->saveAttachment(
            $webName, $topic, $fileName, $user,
            { dontlog => !$TWiki::cfg{Log}{upload},
              comment => $fileComment,
              hide => $hideFile,
              createlink => $createLink,
              stream => $stream,
              filepath => $filePath,
              filesize => $fileSize,
              filedate => $fileDate,
          } );
    } catch Error::Simple with {
        throw TWiki::OopsException( 'attention',
                                    def => 'save_error',
                                    web => $webName,
                                    topic => $topic,
                                    params => shift->{-text} );
    };

    close( $stream ) if $stream;

    # ok lets convert the file
    my $fullpath = "$TWiki::cfg{PubDir}/$webName/$topic/$filePath";
    my $cnt = TWiki::Plugins::OODocConverter::OODoc2Twiki->new(file => $fullpath);

    my @elements = $cnt->getTextElementList;
    my $topicText = $cnt->transformElements(@elements);
    #lets get all the images, extracted out of the document
    my @imageTmpPaths = $cnt->exportAllImages($TWiki::cfg{TempfileDir});
    # attache images
    foreach my $image (@imageTmpPaths) {
        try {
         $session->{store}->saveAttachment(
            $webName, $topic, $fileName, $user,
            { dontlog => 1,
              comment => "document image",
              hide => 0,
              createlink => 0,
              file => $image
            } );
        } catch Error::Simple with {
                throw TWiki::OopsException( 'attention',
                                    def => 'save_error',
                                    web => $webName,
                                    topic => $topic,
                                    params => shift->{-text} );
        };
    }
    # now set the new topic content
    my( $meta, $old_text ) = $session->{store}->readTopic(undef, $webName, $topic );
    $session->{store}->saveTopic( $session->{user}, $webName, $topic, $topicText,  $meta , { dontlog => 1 } );