--my $dir = '/path'; # the directory to list my $url = 'http://blah/path'; # the url for that directory opendir DIR, $dir or dir $!; my @links = map { qq(<a href="$url/$_">$_</a>) } readdir DIR; use CGI qw(ul li); print ul(li([@links]));
"The first rule of Perl club is you do not talk about
Perl club."
-- Chip Salzenberg
In reply to Re: Re: Re: Re: read and link !
by davorg
in thread read and link !
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |