use Cwd; my $dir = getcwd; opendir (DIR, $dir) or die $!; my @dir = readdir DIR; rewinddir(DIR); my @perlFiles = grep /\.pl/, readdir DIR; print '<HTML><BODY><FORM ACTION="/cgi-bin/program.pl" METHOD="POST">'; foreach my $item (@perlFiles) { print $item . ':<INPUT TYPE="radio" NAME="filechosen" VALUE="' . $item + . '" >'; } print '<BR></FORM></BODY></HTML>';
In reply to Re: associate radio buttons
by dominix
in thread associate radio buttons
by wolverina
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |