#! /usr/bin/perl -t
use CGI qw/:all/;  #and strict, taint and warnings
print CGI::header;
use CGI::Carp qw/warningsToBrowser fatalsToBrowser/;

print "<ol>";
printf "<li>%s: %s " ,$_,  param( $_ ) for param;
print "</ol>";