#### #!/usr/local/bin/perl -w use CGI qw(:standard); my $name = undef; $name = param("name"); print "value = ",$name, "\n";