Select Code to Download

#! /usr/bin/perl -t
use CGI qw/:all/;  #and strict, taint and warnings
...
printf "<li>%s: %s " ,$_,  param( $_ ) for param;
print "</ol>";