G
Guest
I'.m trying to make a simple program which would print the contents of c:\
folder.
(files and first sub-folders). Am i at the right track? (this doesn't work)
#!/usr/bin/perl
use strict;
print "Content-Type: text/plain\n\n";
my @folder = <c:\*>;
foreach my $file (@folder)
{
print "$file\n";
}
# end
folder.
(files and first sub-folders). Am i at the right track? (this doesn't work)
#!/usr/bin/perl
use strict;
print "Content-Type: text/plain\n\n";
my @folder = <c:\*>;
foreach my $file (@folder)
{
print "$file\n";
}
# end