#!/cygwin/bin/perl require "cgi-lib.pl"; &ReadParse(); $family_name = $in{'name1'}; $first_name = $in{'name2'}; print < 私の名前は$family_name$first_nameです。
私の姓は$family_nameです。
皆さん、私のことは「$first_name」と呼んでください。

HTML_DOCUMENT