On Sun, 03 Apr 2005 14:45:55 -0500, Dave Kettmann wrote:
> Nevermind I *just* figured it out. It is the exit code. Oops :)

No it isn't.  It is the result of printing the return value of a
subroutine whose last expression evaluated is a print() statement.

>> $action = param('action');
>>   if   ( $action eq 'login' )   { print checkpw(); }
>>   else { print login(); }
[snip]
>> 
>> sub checkpw {
>> 
>>   print "Check password here ...\n";
>> }

-- 
Peter Scott
http://www.perlmedic.com/
http://www.perldebugged.com/


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to