concat.pl

来自「This temp directory is used by the JVM f」· PL 代码 · 共 12 行

#!/usr/bin/perl

require "subparseform.lib";
&Parse_Form;

$first = $formdata{'first_name'};
$married = $formdata{'fiance_last'};

$fullname = $first . " " . $married;

print "Content-type: text/html\n\n";
print "Congratulations! Your married name would be $fullname.";