Good to Go! I added the following to the httpd.conf:
Alias /logs/ "/var/log/vista/stcr2tsvr/" <Directory "/var/log/vista/stcr2tsvr/"> Options Indexes MultiViews FollowSymLinks AllowOverride None Order allow,deny Allow from all </Directory>
and changed the code to reflect the alias
#!/usr/bin/perl use strict; use CGI; my $list = new CGI; my $fileDir = "/var/log/vista/stcr2tsvr/"; my $alias = "/logs/"; my @files; print $fileDir; opendir DIR, "$fileDir"; @files = grep(/\.log$/,readdir(DIR)); ## Example file to read 2015 +0210-dubr3psvr-backup.log closedir DIR; print $list->header("text/html"), $list->start_html("Files in $fileDir"), $list->p("These are the files in $fileDir"); foreach my $file (@files) { print $list->p( $list->a({-href=>$alias.$file}, $file) ); } print $list->end_html;
Sometimes a simple question as an answer is the means to solving the problem! THANKS POJ!
In reply to Re: Display DIR files and output in html to select a file
by vhaphisasset
in thread Display DIR files and output in html to select a file
by vhaphisasset
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |