perl -e'while(<>) { chomp; system zip => "-d", $_, "*exe*" }' oldfiles