I want users send data by formmail but when they send nothing or call it from web site they will see error ....

Q

I want users send data by formmail but when they send nothing or call it from web site they will see error.
codes in PHP like this:
if (isset($HTTP_POST_VARS)){
..........
}
else{
echo ("error lalalalal")
}
How it will look in perl?

✍: Guest

A

In php it will be like
if (isset($HTTP_POST_VARS)){
....
}
In perl, tried this.
if ($ENV{'REQUEST_METHOD'} eq 'POST'){
.....
}

2013-08-30, 1876👍, 0💬

I want users send data by formmail but when they send nothing or call it from web site they will see error ....
I want users send data by formmail but when they send nothing or call it from web site they will see error. codes in PHP like this: if (isset($HTTP_POST_VARS)){ .......... } else{ echo ("error lalalalal") } How it will look in perl? In php it will be like if (isset($HTTP_POST_VARS)){ .... } In perl,... 2013-08-30, 1877👍, 0💬

How to turn on Perl warnings? Why is that important?
How to turn on Perl warnings? Why is that important? Perl is very forgiving of strange and sometimes wrong code, which can mean hours spent searching for bugs and weird results. Turning on warnings helps uncover common mistakes and strange places and save a lot of debugging time in the long run. The... 2013-08-27, 1820👍, 0💬

What does Perl do if you try to exploit the execve(2) race involving setuid scripts?
What does Perl do if you try to exploit the execve(2) race involving setuid scripts? Sends mail to root and exits. It has been said that all programs advance to the point of being able to automatically read mail. While not quite at that point (well, without having a module loaded), Perl does at leas... 2013-09-02, 1793👍, 0💬

What is the output of the following Perl program?
What is the output of the following Perl program? 1 $p1 = "prog1.java"; 2 $p1 =~ s/(.*)\.java/$1.cpp/; 3 print "$p1\n"; prog1.cpp 2013-08-30, 1762👍, 0💬

How do I do < fill-in-the-blank > for each element in a hash?
How do I do < fill-in-the-blank > for each element in a hash? Here's a simple technique to process each element in a hash: #!/usr/bin/perl -w %days = ( 'Sun' =>'Sunday', 'Mon' => 'Monday', 'Tue' => 'Tuesday', 'Wed' => 'Wednesday', 'Thu' => 'Thursday', 'Fri' => 'Friday', 'Sat' => 'Satur... 2013-09-03, 1758👍, 0💬

What are scalar data and scalar variables?
What are scalar data and scalar variables? Perl has a flexible concept of data types. Scalar means a single thing, like a number or string. So the Java concept of int, float, double and string equals to Perl's scalar in concept and the numbers and strings are exchangeable. Scalar variable is a Perl ... 2013-08-28, 1750👍, 0💬

Assuming $_ contains HTML, which of the following substitutions will remove all tags in it?
Assuming $_ contains HTML, which of the following substitutions will remove all tags in it? 1.s/<.*>//g; 2.s/<.*?>//gs; 3.s/<\/?[A-Z]\w*(?:\s+[ A-Z]\w*(?:\s*=\s*(?:(["']).*?\ 1|[\w-.]+))?)*\s*>//gsi x;You can't do that. If it weren't for HTML comments, imprope... 2013-08-29, 1744👍, 0💬

Why aren't Perl's patterns regular expressions?
Why aren't Perl's patterns regular expressions? Because Perl patterns have backreferences. A regular expression by definition must be able to determine the next state in the finite automaton without requiring any extra memory to keep around previous state. A pattern /([ab]+)c\1/ requires the state m... 2013-09-02, 1727👍, 0💬

What happens when you return a reference to a private variable?
What happens when you return a reference to a private variable? Perl keeps track of your variables, whether dynamic or otherwise, and doesn't free things before you're done using them. 2013-08-27, 1704👍, 0💬

All rights in the contents of this web site are reserved by the individual author. fyicenter.com does not guarantee the truthfulness, accuracy, or reliability of any contents.