Select Code to Download

Package MailConfig;
use strict;
@MailConfig::fields=qw /to from subject message/;

use strict;
require "config_mail.pl";
...
<td>Subject:</td>
<td><input type="text" name="$MailConfig::fields[2]" size="24"></t
+d>