Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

A warning about passing mountpoints as arguments to directory recursion programmes

by Don Coyote (Pilgrim)
on Apr 26, 2013 at 14:05 UTC ( #1030835=perlmeditation: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
    die 'do not run this code';
    #get arguments;
    my ($filepathlist,$mountpoint)= @ARGV;
    die 'usage & defaults' if $filepathlist =~ /^-{0,2}h(elp)?\s*$/;
  2. or download this
    die 'do not run this code';
    $filepathlist = 'home/Documents/directorieslist' unless $filepathlist;
  3. or download this
    #use default file, but supply mountpoint;
    > perl ./ /mount/path

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlmeditation [id://1030835]
Approved by Corion
Front-paged by Old_Gray_Bear
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (8)
As of 2015-11-28 02:22 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (737 votes), past polls