hello
i ve found a perl script to calculate the sum of the permissions my principal files
the line which is writing in my file is
foreach $name ( sort @files) {
($uid,$gid) = (stat $nane)[4,5];
ici la ligne //////// $stat = sprintf "%Oo", (stat_)[2];//////////////////
and when i check the result with ./checksum.pl /bin
i ve number not valid instead of sums
0o /bin/uname 0o /bin/unicode_start 0o /bin/unlink 0o /bin/usleep 0o /bin/vi 0o /bin/view 0o /bin/vim 0o /bin/vim-minimal 0o /bin/ypdomainname 0o /bin/zcat
thanks for help
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
