in reply to Re^2: Reading Files/Directories
in thread Reading Files/Directories

This works for me: 
#!perl -w
use strict;
opendir (DIR, './') || die "can't open dir:: $! \n";
for my $file(readdir(DIR)) {
    next if -d $file;
    print $file."\n";
}

[download]

Replies are listed 'Best First'.
Re^4: Reading Files/Directories
by GThorne (Initiate) on Apr 04, 2005 at 21:12 UTC
    Thanks, but the response by Merlyn did the trick.
[reply]

In Section Seekers of Perl Wisdom