perl - Cookie error when using CGI::Session -


it's first experiment cgi::sessions , i'm getting error message in logs don't know how fix. looks problem on line 28 of code, $cookie variable in not imported:

[mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] variable "$cookie" not imported @ /usr/lib/cgi-bin/login.pl line 28. 5028 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] \t(did mean &cookie instead?) 5029 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] variable "$cookie" not imported @ /usr/lib/cgi-bin/login.pl line 29. 5030 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] \t(did mean &cookie instead?) 5031 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] global symbol "$cookie" requires explicit package name @ /usr/lib/cgi-bin/login.pl line 28. 5032 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] global symbol "$cookie" requires explicit package name @ /usr/lib/cgi-bin/login.pl line 29. 5033 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] bareword "username" not allowed while "strict subs" in use @ /usr/lib/cgi-bin/login.pl line 34. 5034 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] bareword "password" not allowed while "strict subs" in use @ /usr/lib/cgi-bin/login.pl line 35. 5035 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] execution of /usr/lib/cgi-bin/login.pl aborted due compilation errors. 5036 [mon aug 18 21:42:32 2014] [error] [client 127.0.0.1] premature end of script headers: login.pl

here's code:

1 #!/usr/bin/perl -wt   2 use strict;   3    4 use cgi::session;   5 use cgi qw(:standard);   6    7 %names = map { $_ => 1 } param;   8 $open = "1234";   9   10 sub windowlayout() {  11           header,  12           start_html("input form"),  13           start_form,  14           "please enter username:",  15           textfield(-name=>'username',  16                           -maxlength=>20),p,  17           "please enter password:",  18           password_field(-name=>'password',  19                           -maxlength=>20),p,  20           submit,hr  21 }  22   23 if ($names{username} , $names{password}) {  24   25 $cgi = new cgi;  26 $session = new cgi::session(undef, $cgi, {directory=>'/tmp'});  27   28 $cookie = $cgi->cookie(cgisessid => $session->id);  29 print $cgi->header(-cookie=>$cookie);  30   31 $username  = param("username");  32 $password  = param("password");  33   34 $session->param(username, $username);  35 $session->param(password, $password);  36   37  if ($password ne $open) {  38        print  39         windowlayout(),  40         end_form,  41           p({-style=>'color: red;'},  42                  "sorry wrong password!");  43        print end_html;  44   } else {  45        print  46           redirect("hello.pl");  47   }  48  }else {  49     print  50          windowlayout(),  51          end_html;  52  }

as you're using strict in code (which is, of course, great habit in to), you'll need declare of variables my (or equivalent). don't $cookie.

so change:

$cookie = $cgi->cookie(cgisessid => $session->id);

to:

my $cookie = $cgi->cookie(cgisessid => $session->id);

for future reference, if perl error message don't understand, can more detail problem adding use diagnostics code (but remember remove again once problem fixed).

you have couple of other errors. strings 'username' , 'password' need quoted string on lines 34 , 35.


Comments

Post a Comment

Popular posts from this blog

java - How to specify maven bin in eclipse maven plugin? -

i have eclipse maven plugin coming on centos. how can execute maven command on linx like: mvn clean package [abigail@localhost ~]$ mvn bash: mvn: command not found how should specify path executable of maven plugin in eclipse? or have install maven seperately？ thanks. eclipse (m2e) have bundled central parts of maven inside eclipse plugin, why not detected, , not usable. investigation find correct way bootstrap it, have create launcher file manually. if want run maven outside of eclipse, far better off standalone version of maven. mvn command bootstrap maven runtime system correctly, , secondly, able use advice concerning use of maven. maven binaries quite stable, wouldn't need upgrade upgrade eclipse. you can subsequently switch eclipse use external installation if prefer.
Read more

single sign on - Logging into Plone site with credentials passed through HTTP -

i using plone 4.3.3 , new plone development. here trying achieve: i have site going redirect plone site. in http url line redirects plone site pass username whereas plone site should automatically log user username in without asking credentials password. not care safety or encryption @ point. how achieve that? (i guess need somehow modify existing login view, how do that?) thanks. i had same problem , @ end i've developed own pas plugin. i've followed next steps: create pas plugin implement extractcredentials method following this example implement authenticatecredentials method following this example add plugin develop section in build.conf. start plone , open zope console. go acl_users folder , add plugin pas system there examples here can use templates.
Read more

php - Why does AJAX not process login form? -

i writing simple login script in php form. can't work. there wrong ajax. when click submit button doesn't anything. this login html form: <form id="login_form"> <input type="text" class="input_field" name="username" id="username" value="gebruikersnaam" onclick="if(value=='gebruikersnaam'){ this.value='' }"/> <input type="password" class="input_field" name="password" id="password"/> <input type="submit" class="login_button" id="login_button" value="ga door"/> </form> this ajax: $(document).ready(function(){ $("#login_form").submit(function() { $.ajax({ type: "post", url: 'php/login_check.php', data: $("#login_form").serialize(), // serializes form...
Read more