Dossier : : L'utilisation est un dossier facile, polyvalent, portatif traitant le module.

Dossier : : L'utilisation fournit un coffre à outils global d'utilitaires pour automatiser toutes sortes de fonctionnalités usuelles sur le dossier/répertoires. Son but est de faire ainsi de la façon la plus portative possible de sorte que les usagers de ce module ne doivent pas s'inquiéter de si leurs régimes fonctionnent sur d'autres OSes et machines.

SYNTHÈSE

dossier d'utilisation : : Utilisation ;
mon ($f) = dossier : : Util->new () ;

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

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

$f->write_file (
=> bar.txt de dossier,
=> content $content,
=> 0644 de bitmask
) ;

$f->write_file (
=> file.bin, => content $binary_content de dossier, --binmode
) ;

mon (@lines) = $f->load_file (randomquote.txt, --comme-lignes) ;
mon ($line) = international (RAND (@lines scalaires));

impression $lines [$line] ;

mon (@files) = $f->list_dir (/var/tmp, qw/ --dossiers-seulement --recurse/) ;
mon (@textfiles) = $f->list_dir (/var/tmp, --pattern=.txt$) ;

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

mon ($HANDLE) = $f->open_handle (
=> wibble.log de dossier,
le => de mode ajoutent
) ;

monde de l'impression $HANDLE « bonjour ! Son », localtime scalaire ;

$HANDLE proche
}

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

estamper « mon dossier a un bitmask de ». $f->bitmask (my.file) ;

estamper « mon dossier est ». joindre (, $f->file_type (my.file)). « dossier. »

avertir que ce dossier est binaire ! si $f->isbin (my.file) ;

estamper « mon dossier était Last modified sur ».
localtime scalaire ($f->last_modified (my.file));

#… et _lots_ davantage