http://qs321.pair.com?node_id=764545


in reply to multiple file operations using perl one-liners

Am I missing something or is this far too complicated?

Why are you sorting your files when you want to process all of them anyway?

And I can't see a real reason for your "xcol" or an intermediate file, you can do all of it one go like this (-n does the looping here):

du -b */*/old.zip | perl -ne 'chomp; my $f = (split /t/)[1]; system qq +{zip -d $f "*exe*"}'