Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re^4: Malware on CPAN

by taint (Chaplain)
on Jun 20, 2012 at 17:57 UTC ( #977435=note: print w/ replies, xml ) Need Help??


in reply to Re^3: Malware on CPAN
in thread Malware on CPAN

Say, why would you do while loop instead of xargs ...
find ... -print0 | xargs -0 chmod ...
... ?

For consistency across *NIX's && versions || find(1) is guaranteed to return the same results, regardless of *NIX || version. :)

#!/usr/bin/perl -Tw
use strict;
use perl::always;
my $perl_version( 5.12.4 );
print $perl_version;


Comment on Re^4: Malware on CPAN
Download Code
Re^5: Malware on CPAN
by Anonymous Monk on Jun 20, 2012 at 23:22 UTC
    "For consistency across *NIX's && versions || find(1) is ...."

    Woah! The question was why are you using a while loop instead of xargs. You did nothing to show how xargs fails to work as reliably as a while loop.

      D'OH!
      Right you are! Sorry, I'm afraid I hadn't finished my first cup of coffee yet (late night).
      Operating a keyboard without sufficient coffee, should be considered as bad as
      drinking, and driving -- that's one citation for me! :/
      To your original point; My previous attempts with xargs(1) produced inconsistent results -- hence, my previous reply.
      But what about the "for loop", you ask? Probably overkill; I used it, it worked && bad habits die hard. ;)
      I should use this as an opportunity to conjure up a perl script, to accomplish these same tasks. :)

      use perl::always;
      my $perl_version( 5.12.4 );
      print $perl_version;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://977435]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (18)
As of 2015-07-01 17:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (13 votes), past polls