I have created a CGI-based page,after entering all the
values in to the fields, How to get the output on the web
browser using Perl
Answers were Sorted based on User's Feedback
Answer / guest
In the form Action you have to specify the (perl) program,
you want to execute on submitting this form.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / suvvari
In the HTML form, you have to mention the perl script name.
Ex: <form action="test.pl" method="POST">. Then in the
test.pl, you have to mention the content-type as
print "content-type: text/html\n\n";. And read the form
values and print them.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / raghav
Including the First two answers also go thru CGI.pm module.
or else you can also use the cgi-lib.pl.
Go through the docs of the modules.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / vipul dalwala
print "content-type: text/html\n\n";.
if ($ENV{’REQUEST_METHOD’} eq ’POST’) {
read(STDIN, $buffer, $ENV{’CONTENT_LENGTH’});
}
else {
$buffer = $ENV{’QUERY_STRING’};
}
@keyvaluepairs = split(/&/, $buffer);
foreach $pair (@keyvaluepairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex
($1))/eg;
print $name . "=". $value ."<br>";
}
| Is This Answer Correct ? | 0 Yes | 0 No |
Explain the functioning of conditional structures in perl.
How do I debug a perl program?
What are the different string manipulation operators in perl?
What are the various flags/arguments that can be used while executing a perl program?
What are the options that can be used to avoid logic errors in perl?
Where do we require ‘chomp’ and what does it mean?
my @array=('data1','data2'); my @array1=('data1','data2'); my ($i,$k); $i=7; $k=7; while($i){ $array [++$#array] = 'ree'; $i--; print "@array"; } while($k){ push(@array1,'ree'); $k--; print "@array1"; } Are these two while loop are doing the same functionality ? What may be the difference?
There are some duplicate entries in an array and you want to remove them. How would you do that?
Distinguish my and local?
What is the importance of perl warnings? How do you turn them on?
Write a script to reverse a string without using perl's built in functions?
What are prefix dereferencer? List them.