MD5 Checksumme für ein Verzeichnis - #133007 (Allgemeines zu Perl)

2010-02-15 15:59

User since
2003-08-04
12208 Artikel
Admin1

ja, dann sehe ich kein problem. wenn du weisst, wie man das mit einer datei macht, sollten auch mehrere leicht zu machen sein.

Code (perl): (dl )

my $ctx = Digest::MD5->new;
for my $file (glob "dir/*") {
    open my $fh, '<', $file or next;
    $ctx->addfile($fh);
}

edit: verzeichnisse musst du halt noch aussortieren.
Last edited: 2010-02-15 16:00:51 +0100 (CET)

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem