#!/home/crossda/perl/bin/perl use strict; use warnings; use CGI ':cgi'; print header(-type => 'text/plain'); foreach (param) { print "$_ : ", param($_), "\n"; }