problem with $c->request->param

megaurav2002 has asked for the wisdom of the Perl Monks concerning the following question:

Hello monks, I have a sub from which i call two another sub methods. eg:

sub forgotPassword : Local {

       my( $self, $c ) = @_;

$c->stash->{'content'} = \@tbl_dob_yr;

$tbl_user_contact_data = $self->_HandleForgotPassword($c, 'forgotPassw
+ord.tt');

if($tbl_user_contact_data)
{$self->_HandleForgotPassword2($c, $tbl_user_contact_data, 'forgotPass
+word2.tt', 'passwordResetConfirmation.tt');
}}
[download]

Now, my problem is that i have to perform some actions when the user clicks "submit"( a button in display page of second method). So to do that i check if (defined $c->request->param("Submit")). Even if the user presses "Submit" this condition is not getting satisfied because i think $c->request->param carries the value of button pressed earlier(in the first method). I hope i made myself clear. Any help will be appreciated. Thanks!

Comment on problem with $c->request->param Download Code

Replies are listed 'Best First'.
Re: problem with $c->request->param by shmem (Chancellor) on May 05, 2007 at 07:51 UTC
? I hope i made myself clear No, you didn't. I have no Idea what you are speaking about. I see a subroutine with garbled formatting where two calls are made, then you go talking about a "Submit" param checking. When, were? no code. What are you trying to to? Are those two "methods" you are talking about the subroutines in that sub? Please reformulate. See I know what I mean. Why don't you? --shmem _($_=" "x(1<<5)."?\n".q·/)Oo. G°\ / /\_¯/(q / ---------------------------- \__(m.====·.(_("always off the crowd"))."· ");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}	[reply]

Replies are listed 'Best First'.

Re: problem with $c->request->param
by shmem (Chancellor) on May 05, 2007 at 07:51 UTC

I hope i made myself clear

No, you didn't. I have no Idea what you are speaking about. I see a subroutine with garbled formatting where two calls are made, then you go talking about a "Submit" param checking. When, were? no code. What are you trying to to? Are those two "methods" you are talking about the subroutines in that sub? Please reformulate. See I know what I mean. Why don't you?

--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}

[reply]