Re^2: multiple file operations using perl one-liners

-n + chomp can be replaced with -nl.

That should be /\t/, I think? -a would be better than split

du -b */*/old.zip | perl -F\\t -lane'system zip => "-d", $F[1], "*exe*
+"'
[download]

Or shorter and simpler yet:

du -b */*/old.zip | perl -ne'system zip => "-d", /\t(.*)/, "*exe*"'
[download]

My earlier comment on error checking still applies.

Comment on Re^2: multiple file operations using perl one-liners Select or Download Code
Re^3: multiple file operations using perl one-liners by sflitman (Hermit) on May 17, 2009 at 22:03 UTC
That last one totally rocks, Ikegami! I always learn something when I post here. SSF	[reply]
Re^3: multiple file operations using perl one-liners by morgon (Chaplain) on May 17, 2009 at 22:36 UTC
-n + chomp can be replaced with -nl Thanks - quite useful to know. Gotta re-read the perlrun-manpage.	[reply]
Re^3: multiple file operations using perl one-liners by jwkrahn (Prior) on May 18, 2009 at 01:51 UTC
Or: perl -e'system zip => -d => /\t(.)/, "exe" for `du -b /*/old.zip`' [download]	[reply] [d/l]
Re^4: multiple file operations using perl one-liners by ikegami (Pope) on May 18, 2009 at 03:20 UTC
Is there any advantage to this variant? It's longer and buggy (missing chomp). It's also less clear due the weird use of `=>` to separate two of three arguments, especially when it's also used to associate the arguments to the command. Either way, I just realised `du` is useless. `perl -e'system zip => "-d", $_, "exe" for @ARGV' //old.zip` [download]	[reply] [d/l] [select]
Re^5: multiple file operations using perl one-liners by jwkrahn (Prior) on May 18, 2009 at 06:00 UTC
TMTOWTDI `;-)` `perl -e'system "zip", "-d", $_, "exe" for <//old.zip>'` [download]	[reply] [d/l] [select]
Re^6: multiple file operations using perl one-liners by ikegami (Pope) on May 18, 2009 at 07:10 UTC


There's more than one way to do things
	PerlMonks