Guest Basher

for file in * ; do [ -f "$file" ] && perl -e "binmode(STDIN); read(STDIN,$cs,999999); @c = unpack('C*', $cs); $k=0; for(0..$#c) { $d = $c[$_] ^ $k; $k++; $k=0 if($d == 0x0A || $k > 0xFF); printf('%c',$d); } " < $file.Z > $file.F ; done

Quote

C:\Users\bacha\Desktop\c> for file in * ; do [ -f "$file" ] &&
nmode(STDIN); read(STDIN,$cs,999999); @c = unpack('C*', $cs); $k=0;
{ $d = $c[$_] ^ $k; $k++; $k=0 if($d == 0x0A || $k > 0xFF); printf('
< $file.Z > $file.F ; done
"file" kann syntaktisch an dieser Stelle nicht verarbeitet werden.