Could do a glob as:
while ( 1 ) {
$filein = <*.txt>;
last if ( ! defined $filein );
# other processing
}
Could do a readdir(ie, opendir, readdir).
Also use backticks and work with the output via say dir(ie, my @output = `dir`;)
Wags ;)
-----Original Message-----
From: Anton Arhipov [mailto:[EMAIL PROTECTED]]
Sent: Saturday, September 15, 2001 04:09
To: [EMAIL PROTECTED]
Subject: Directory scan
Hello,
I need to scan a directory and generate a list of its files...
(preferably a txt with all the filenames)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
