Исходное сообщение
"Perl + md5" Отправлено NuINu, 10-Май-07 16:54
>Подскажите как можно реализовать скрипт на Perle по обработке md5, в bashе >он реализуется достаточно просто: > >md5sum /etc >> data.md5 >md5sum -c data.md5 >но вот на перле я все перерыл и нашел только как получить >md5 сумму с файла > >#!/usr/bin/perl >use MD5; >$md5 = new MD5; >print md5_hex(~/script.pl); > >а как потом сравнить, то? что сравнить то? если ты имеешь в виду что разные хеши получаются ;-) так запусти md5sum -t получаться одинаковые,  а если хочешь чтобы в перле бинарные были посмотри MD5.pm там найдешь как.