perlquestion
htmanning
Monks,
<p>
I have a large directory called registrations with a folder for each user who has registered. I need to be able to look into each of these folders via a browser, but I have restricted indexes. I thought I could use Perl to do it. I'm using File::Fine::Rule like this:
<code>
use File::Find::Rule;
my $base_dir = "/usr/home/username/public_html/registrations/$dir";
my $find_rule = File::Find::Rule->new;
foreach $item (@files) {
$item =~ s/\/usr\/home\/username\/public_html\/registrations\/$dir\///g;
print "<a href=\"https://www.domain.com/registrations/$dir/$item\">$item</a><br>";
}
</code>
I feed it the directory via the URL and It works, but it does not show file sizes or any other info besides the filename. Is there another module I should be using or a better way to do it?
<p>
Thanks.