#!/usr/local/bin/perl -w use CGI qw(:cgi); # Include CGI functions use CGI::Carp qw(fatalsToBrowser); # Send error messages to browser # # Generate an HTML page and start a list. # print < Thank You

Order Confirmation

$key: "; print join(", ",@values),"

END_of_HTML