Datei splitten in mehrere Dateien - #154322 (Allgemeines zu Perl)

rosti

2011-11-18 19:41

User since
2011-03-19
3507 Artikel
BenutzerIn

Quote
wie mache ich den open anders?

Anders && besser && schöner ;)

Code (perl): (dl )

use strict;
use warnings;
use IO::File;
my $fh = IO::File->new;
$fh->open($file, O_RDWR) or die $!;
$fh->print...
$fh->seek...
$fh->truncate...
$fh->close;

Es gibt gute Gründe, das Handle von IO:::File machen zu lassen. Zu Deinem Problem: Abstrahiere die Aufgabenstellung "Datei splitten" mal in die Aufgabenstellung "Datenstruktur verarbeiten".

D.h., überlege Dir, wie Du den Inhalt der Datei auf eine Datenstruktur, sprich Array, Hash, Hash-Referenzen o.ä. bekommst. Das Zurückschreiben in die Datei ist dann die Umkehrung des Algorithmus.

Zeig mal die Datei, evntl. fällt mir was ein ;)