Tie::File CR und LF - #181374 (Allgemeines zu Perl)

Gast Jürgen

2015-06-20 19:00

Hallo ihr beiden,

danke für eure Rückmeldung!
Auch wenn ich durch eure Rückmeldung langsam aber sicher begann an mir zu zweifeln...

Aber:
Ich habe, um so wenig code wie möglich zu posten, natürlich hier und da etwas weggelassen...
Das problem tritt nämlich genau dann auf, wenn mein Perl-Scruipt selbst mit "utf8" geschrieben wird und ich mit Tie::File einen Umlaut schreiben möchte.

Hier nun der komplette Code:

Code (perl): (dl )

#!/usr/bin/perl
use Tie::File;
use utf8;

tie my @A, 'Tie::File', "blah.txt", recsep => "\r\n", discipline => ':encoding(UTF-8)' or die $!;

$A[3] = 'Hallo';
$A[4] = 'welt';
$A[12] = 'Sehr gut Jürgen';
$A[13] = 'äüöß';
$A[14] = 'Was mache ich falsch?';

Was mache kich falsch?
Woran liegt es?
Wenn ich Tie::File nicht benutzen kann, gibt es ein ähnliches Modul oder ein "BestPractise"?
Ich lade Teile einer UTF8-kodierten Textdatei in mein Programm.
Die Teile die ich ändere, wegnehme oder hinzufügen sollen in die bestehende Textdatei wieder eingefügt werden.
Heisst:
wenn ich nur die Zeilen ändere => Änderung übernehmen an genau der Stelle in der Textdatei wo es war
wenn ich Text ändere und Zeilen lösche => Änderungen übernehmen und die gelöschten Zeilen auch in der Datei löschen
wenn ich Text ändere und neue Zeilen hinzufüge => Änderungen übernehmen und die neuen Zeilen in die Textdatei einfügen. Alle nachfolgenden Zeilen rutschen damit um die Anzahl der neuen Zeilen nach "hinten"
Wie könnte ich das umsetzen ausser mit Tie::File?

Wisst ihr die Tie::File Lösung oder eine andere Lösung?

Danke und schönen Samstag Abend
Grüße
Jürgen
Last edited: 2015-06-20 19:02:07 +0200 (CEST)