catalyst2 community forums - View Single Post - Reading and writing to external .txt files

CAT4361 · 20-03-2006, 08:08 PM

Paul, tried:

//
/
\\
\

with and without extensions ... still nothing??

Jacob,

Tried this piece of code to print out the directory:

opendir (LABEL, ".") || Error ('open', 'directory');
my @logfiles = readdir (LABEL);
close (LABEL);

if (@logfiles)
{
print "following files are available...";
foreach(sort @logfiles)
{
print"<LI>$_" if /^logfile/;
}
}

To try and print the current directory and changed to try parent directories i.e. " ../" and "../../" etc... but nothing

Maybe I should have gone for a UNIX server ...??

20-03-2006, 08:08 PM	#6 (permalink)
CAT4361 Registered User Join Date: Mar 2006 Posts: 14	Paul, tried: // / \\ \ with and without extensions ... still nothing?? Jacob, Tried this piece of code to print out the directory: opendir (LABEL, ".") \|\| Error ('open', 'directory'); my @logfiles = readdir (LABEL); close (LABEL); if (@logfiles) { print "following files are available..."; foreach(sort @logfiles) { print"<LI>$_" if /^logfile/; } } To try and print the current directory and changed to try parent directories i.e. " ../" and "../../" etc... but nothing Maybe I should have gone for a UNIX server ...??