Re: [MacPerl] FTP client? (fwd)

[Terje Bless <link@tss.no>]

Paul DuBois wrote:
> 
>>%find . -name "*" -print > dir.out
>
>Actually it won't generate full pathnames, it'll generate
>pathnames relative to the current directory.

Now we`re *really* getting far afield here. :-(
So, to get (marginally ;D) back on topic, how about using File::Find
instead? :-)

% find2perl /tmp -name \*.txt -print
#!/usr/local/bin/perl -w

require "find.pl";

&find('/tmp'); # Traverse desired filesystems
sub wanted {print("$name\n") if m(^.*\.txt$)}
__END__

The above is a slightly edited version of the output from the find2perl
command. You should be able to "run" this message by saving it to a file
(or piping it to "perl -x"`s stdin) and giving perl the -x switch when
run.
IIRC, File::Find works like a charm on MacPerl too (you`ll need Mac OS
path separators etc., of course).

-- 
Party? Party, lord? Yes, lord. Right away, lord.
        - Beopunk Cyberwulf

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch