5. use CGI qw(:standard); print header; print start_html('Form Example'), h1('My Example Form'), start_form, "Name:", textfield('name'), p, "Age:", textfield('age'), p, submit, end_form; if (param()) { print "Hi ", em(param('name')), "You are ", em(param('age')), "years old "; } print end_html; HTMLフォーム (Perl CGI.pm利用) 『例解PHP』(2001年) 序文より (Rasmus Lerdorf) 7. <HTML><header><title>Form Example</titl