in reply to Re^2: Why does Modern::Perl hate CGI.pm || my simple form?
in thread Why does Modern::Perl hate CGI.pm || my simple form?
Take note of the additional my#!/usr/bin/perl -Tw # dead simple stupid script that echoes input use CGI; use Modern::Perl 2011; my $head ='<!DOCTYPE html><head></head><body> <br /> <form method="post" action="/valid-form.cgi"> '; my $form =' <label for="input">Input: </label><input type="text" na +me="input" value="" /> <input type="submit" value="Post Input" /> '; my $foot =' </form></body></html>'; print "content-type:text/html; charset=utf-8\n\n"; print $head; print $form; my $query = CGI->new; my $input = $query->param('input'); if (!$input) { print "<br />No input"; }else{ print "<br />$input"; } print $foot;
#!/usr/bin/perl -Tw use perl::always; my $perl_version = (5.12.5); print $perl_version;
|
|---|