X-Git-Url: https://mattmccutchen.net/rsync/rsync.git/blobdiff_plain/4187572616d8cde172d418329053a2a67529c6ba..eefe189e1d8a7919d3b69a8db6dede3cf7f8c250:/support/file-attr-restore diff --git a/support/file-attr-restore b/support/file-attr-restore index 8c25310e..c4da61ef 100755 --- a/support/file-attr-restore +++ b/support/file-attr-restore @@ -48,8 +48,7 @@ while (<>) { die "Invalid input line $.:\n$_" unless defined $name; die "A filename is not properly escaped:\n$_" unless $name =~ /^[^"\\]*(\\(\d\d\d|\D)[^"\\]*)*$/; my $fn = $name; - $fn =~ s/([\$\@\%])/\\$1/g; - $fn = eval "\"$fn\""; + $fn =~ s/\\(\d+|.)/ eval "\"\\$1\"" /eg; if ($type eq '-') { undef $type unless -f $fn; } elsif ($type eq 'd') {