Creating a txt file with paths to all files

anju has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Creating a txt file with paths to all files by earthboundmisfit (Chaplain) on Jun 19, 2002 at 16:20 UTC
Sounds like a job for File::Find `#! Perl -w use strict; use File::Find; my $fdir='C:'; my @filelist = (); find(\&wanted, $fdir); write_file() if (@filelist); sub write_file() { .... # sub that writes @filelist to a text file } sub wanted { my $thisfile = $File::Find::name; push(@filelist, $thisfile) if ($thisfile =~ m/\.txt/); #for ex +ample }` [download] hth	[reply] [d/l]
Re: Creating a txt file with paths to all files by jepri (Parson) on Jun 19, 2002 at 16:19 UTC
Yep, just read up on the File::Find module by Jarkko. You already have it installed. ____________________ Jeremy I didn't believe in evil until I dated it.	[reply]
Re: Creating a txt file with paths to all files by Caillte (Friar) on Jun 19, 2002 at 16:18 UTC
`dir /s/b c:\ > x.txt`; [download] This page is intentionally left justified.	[reply] [d/l]
Re: Creating a txt file with paths to all files by zentara (Cardinal) on Jun 19, 2002 at 16:31 UTC
Here's a simple script using File::Find: Just run it from the top directory, use / for the whole filesystem, and run it as root. To output it to a textfile: ./filelister > my.txt `#!/usr/bin/perl #filelister # Recursively searchs down thru directories for files use warnings; use strict; use File::Find; find (\&found,"."); $" = "\n"; print "@ARGV\n"; exit; sub found{ push @ARGV, $File::Find::name if -f; }` [download]	[reply] [d/l]
Re: Creating a txt file with paths to all files by caedes (Pilgrim) on Jun 19, 2002 at 16:20 UTC
Since you are on windows you can do it easily enough with one DOS command from the C: root directory: `dir /s /b > file.txt` [download] Edit: ok,ok... I'm slow. Geez. :-\	[reply] [d/l]
Re: Re: Creating a txt file with paths to all files by Anonymous Monk on Jun 19, 2002 at 17:52 UTC
If you had a real operating system you could do this ... `find / > allfiles` [download]	[reply] [d/l]
Re: Creating a txt file with paths to all files by stefp (Vicar) on Jun 19, 2002 at 19:08 UTC
I don't know the motivation behind your question. But you may look at slocate before reinventing wheels. It allows to store in a efficient manner such a list of file and to search on that list. It may even be supported on Windows. I got the URL from the rpm package but it seems wrong. Probably the right URL may be found trhu google -- stefp -- check out TeXmacs wiki	[reply]