#!/usr/bin/perl use warnings; # arg_echo.cgi - print all form values use strict; use CGI qw/:standard/; $|=1; print "Content-type: text/plain\n\n"; foreach my $name ( param() ) { print "$name: '", param($name), "'\n"; }