CGI-ContactForm

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
v1.10 (Apr 4, 2003)
    Template based customization added as an option.
 
v1.03 (Mar 30, 2003)
    CGI.pm used for parsing form data.
 
    New argument: 'maxsize' - for limiting the message size.
 
v1.02 (Feb 16, 2003)
    DOCTYPE declaration changed to XHTML 1.1.
 
v1.01 (Feb 13, 2003)
    CSS validation error corrected.
 
v1.0 (Feb 12, 2003)
    Additional arguments added that makes it possible to have the form
    display non-English text.
 
    Warnings enabled.

lib/CGI/ContactForm.pm  view on Meta::CPAN

541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
</body>
</html>
FORM
    }
}
 
sub headprint {
    my $args = shift;
    print "Content-type: text/html; charset=$args->{encoding}\n\n";
    print <<HEAD;
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
                      "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<head>
<title>$args->{title} $args->{recname}</title>
<style type="text/css">
.error { font-weight: bold }
</style>
${ stylesheet( $args->{styleurl} ) }
</head>
<body>



( run in 0.529 second using v1.01-cache-2.11-cpan-3cd7ad12f66 )