projects
/
cloudstore.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
call XS code directly
[cloudstore.git]
/
migrate-md5-attr.pl
diff --git
a/migrate-md5-attr.pl
b/migrate-md5-attr.pl
index
8d11867
..
5e28870
100755
(executable)
--- a/
migrate-md5-attr.pl
+++ b/
migrate-md5-attr.pl
@@
-23,7
+23,11
@@
while(<$passwd>) {
while( my($k,$v) = each(%h) ) {
#print "$v $k\n";
- system "attr -s md5 -V $v $dir/$k";
+ if ( -e "$dir/$k" ) {
+ system 'attr', '-s', 'md5', '-V', $v, "$dir/$k";
+ } else {
+ warn "SKIP $dir/$k\n";
+ }
}
untie %h;