Does glob() work?
my @files = glob( "$directory/*" );
Thanks,
Tim Tompkins
----------------------------------------------
Staff Engineer / Programmer
http://www.arttoday.com/
----------------------------------------------
----- Original Message -----
From: "Cornelius Kuschnereit" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Friday, March 30, 2001 3:27 AM
Subject: [Mason] Strange Problem with opendir / readdir
> Hi!
> I have strange problems while using opendir / readdir
> under MasonHQ. I'm not shure, but it seems to be a perl / modperl / Apache
> or Mason Bug.
> I have no problem to run the same directly from the shell.
>
> Is the a known bug?
>
> Kind regards
> Cornelius Kuschnereit
>
> Environement:
> Apache 1.3.19
> modperl 1.25
> mason 1.01
> RedHat 7.0
> reiserfs
>
> ----------------------------------------------
> test1_opendir.html
> my little test:
> ----------------------------------------------
> <%init>
> my $directory = qq[/usr/local/apache];
> my $dir;
> my @dirs = ();
>
> opendir( DIR, $directory );
> @dirs = readdir( DIR );
> close( DIR );
> </%init>
> Test --------- <BR>
> % foreach $dir (sort @dirs) {
> file:<% $dir %>
> % }
> <<<< <BR>
> ----------------------------------------------
> the (wrong) result:
> ----------------------------------------------
> Test --------- <BR>
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> file:
> <<<< <BR>
> ----------------------------------------------
>
> ----------------------------------------------
> test1_opendir.pl
> my little (working) test:
> ----------------------------------------------
> #!/usr/bin/perl
>
> my $directory = qq[/usr/local/apache];
> my $dir;
> my @dirs = ();
>
> opendir( DIR, $directory );
> @dirs = readdir( DIR );
> close( DIR );
> print "Test --------- \n";
>
> foreach $dir (sort @dirs) {
> print "file: $dir\n";
> }
> print "<<<<<\n";
> ----------------------------------------------
> the (right) result:
> ----------------------------------------------
> Test ---------
> file: .
> file: ..
> file: bin
> file: cgi-bin
> file: conf
> file: htdocs
> file: htdocs_mason_data_cache
> file: icons
> file: include
> file: libexec
> file: logs
> file: man
> file: perlmod
> file: proxy
> <<<<<
> ----------------------------------------------
>
>
>
>
>
> _______________________________________________
> Mason-users mailing list
> [EMAIL PROTECTED]
> http://lists.sourceforge.net/lists/listinfo/mason-users
>
