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

Please i need a solution for this, i want to use (PERL) to process a form instead of PHP, now my only problem is converting this LINE to (PERL) SCRIPT. 
<?php

if(isset($_POST['comment']))     $comment  = $_POST['comment'];

?>

[download]
Thank you.

Replies are listed 'Best First'.
Re: Does Perl have if(isset?
by Corion (Patriarch) on Jan 24, 2014 at 20:29 UTC

    According to the PHP documentation on isset(), the function returns true if the variable has a defined value. This would be equivalent to the defined function of Perl:

        $comment= param('comment')
        if defined param('comment');

    [download]

    I think the $_POST hash in PHP is populated by HTTP POST parameters - you would have to check that too.

[reply]
[d/l]
[select]
Re: Does Perl have if(isset?
by Your Mother (Archbishop) on Jan 24, 2014 at 20:21 UTC

    You should put your code in <code> tags. And without knowing a little Perl this is unlikely to get you far but this is roughly equivalent. I didn't use the if block because it is unperly (to me) when there is no real else. 

    use strict;   # DO NOT LEAVE OUT.
use warnings; # What did I just say?!
use CGI ":standard";

my $comment;
$comment = param("comment") if request_method() eq "POST";

# Note, $comment could be undefined/uninitialized here
# but this is similar to your logical block.

    [download]
[reply]
[d/l]
[select]
Re: Does Perl have if(isset?
by karlgoethebier (Abbot) on Jan 24, 2014 at 21:01 UTC
[reply]

Back to Seekers of Perl Wisdom