Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re^15: RFC: Proposed tutorial - simple login script using CGI::Application

by scorpio17 (Canon)
on Jan 25, 2016 at 17:56 UTC ( #1153597=note: print w/replies, xml ) Need Help??


in reply to Re^14: RFC: Proposed tutorial - simple login script using CGI::Application
in thread RFC: Proposed tutorial - simple login script using CGI::Application

You can't use a print statement in a runmode like this (better read the CGI::Application docs more carefully: see the "Important note about run mode methods" section. It says, "never print to stdout"!). Change your "print" statement to this:
my $output = "Testing after login success.\n";
Then make sure your myrunmode.html template looks something like this:
<html> <head> <title>VPage</title> </head> <body> <TMPL_IF OUTPUT><TMPL_VAR OUTPUT></TMPL_IF> </body> </html>

Note that the OUPUT variable in the template gets populated with the value of the $output variable in the runmode in the $template->param() statement.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1153597]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (5)
As of 2019-10-17 13:07 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?