Datei:: Util ist eine einfache, vielseitig begabte, bewegliche Datei, die Baugruppe handhabt.

Datei:: Util liefert einen kompletten Werkzeugkasten Hilfsprogramme, um alle Arten geläufige Aufgaben auf Datei/Verzeichnissen zu automatisieren. Sein Zweck ist, in der beweglichsten möglichen Weise so zu tun, damit Benutzer dieser Baugruppes nicht um sich sorgen müssen, ob ihre Programme an anderem OSes und Maschinen arbeiten.

SYNOPSE

Gebrauch Datei:: Util;
mein ($f) = Datei:: Util->new ();

mein ($content) = $f->load_file (foo.txt);

$content =~ s/this/that/g;

$f->write_file (
Datei => bar.txt,
zufriedenes => $content,
Bitmaske => 0644
);

$f->write_file (
Datei => file.bin, zufriedenes => $binary_content, --binmode
);

mein (@lines) = $f->load_file (randomquote.txt, --Wieleitungen);
mein ($line) = int (Rand (Skalar@lines));

Druck $lines [$line];

mein (@files) = $f->list_dir (/var/tmp, qw/ --Dateien-nur --recurse/);
mein (@textfiles) = $f->list_dir (/var/tmp, --pattern=.txt$);

wenn ($f->can_write (wibble.log)) {

mein ($HANDLE) = $f->open_handle (
Datei => wibble.log,
Betriebsart => fügen hinzu
);

Druck $HANDLE „hallo Welt! Sein“, Skalarlocaltime;

enges $HANDLE
}

mein ($log_line_count) = $f->line_count (/var/log/httpd/access_log);

„meine Datei drucken hat eine Bitmaske von“. $f->bitmask (my.file);

„meine Datei drucken ist“. (, $f->file_type (my.file) verbinden,). „Datei.“

warnen, daß diese Datei binär ist! wenn $f->isbin (my.file);

„meine Datei drucken war Last modified auf“.
Skalarlocaltime ($f->last_modified (my.file));

#… und _lots_ mehr