Perl : embedding java script with cgi perl script Post: 302783821

Sponsored Content

Top Forums Shell Programming and Scripting Perl : embedding java script with cgi perl script Post 302783821 by scriptscript on Thursday 21st of March 2013 04:01:55 AM

03-21-2013

Registered User

Perl : embedding java script with cgi perl script

Hi All,

I am aware that html tags can be embedded in cgi script as below.. In the same way is it possible to embed the below javascript in perl cgi script ??

Code:

print("<form action="action.htm" method="post" onSubmit="return submitForm(this.Submitbutton)">");
print("<input type = "text" name="message">");
print("<input type = "password" name="password">");
print("<input type="submit" name = "submitbutton" value=" Edit ">");
print("</form>");

Now how to embed the below html with script in perl cgi ?

Code:

<form action="action.htm" method="post" onSubmit="return submitForm(this.Submitbutton)">
<input type = "text" name="message">
<input type = "password" name="password">
<input type="submit" name = "submitbutton" value=" Edit ">
</form>
<script>
function submitForm(s) { // when submit form button pressed
var pwd = document.forms[0].password.value;
if (pwd != 1111) {
alert ("Wrong Password! Your greedy has given up! ");
return false;
}}
</script>

scriptscript

View Public Profile for scriptscript

Find all posts by scriptscript

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

call shell script from perl cgi script problem

hi,, i have perl scipt with line : system('./try.sh $t $d $m'); in shell scipt try.sh i have the line: echo $1 its not printing value of $t that i hav passed..y is it so..i am running it from apache web server

2. Web Development

in cgi perl script a form

hi,i hav a form in cgi perl script.this script accepts a value from user from another html form, and depending upon this value,i need to disable /enable radio buttons in cgi-perl script wen second page is displayed on executing cgi perl script.how do i do it using javascript?

3. Shell Programming and Scripting

Perl cgi script to call bash script?

Novice to perl here. I have created a simple web page in perl, with only one submit button. I would like to execute a bash script on the same server when this button is clicked on. Is this possible in perl? I have spent a few days researching this and am unable to find any useful information....

4. Shell Programming and Scripting

Perl-cgi with java

hi, I am writing a perl-cgi which will extract data from DB and show on portal (like a report). Now I have one portal ready with Java (war deployed). Can I use same portal which will directly call my perl-cgi script ?

5. Shell Programming and Scripting

Embedding HTML in Perl script

My webpage is hosted from perlscript(homepage.pl), i want to add piece of html code in the footer of the homepage. I simply pasted the html code at the end of the perl script as below... ======================================================== close(OUTSQL); ...

6. Web Development

perl cgi script not working

Hello, Met a problem learning perl cgi script. 1 #!/usr/bin/perl -wT 2 3 use strict; 4 use CGI qw(:standard); 5 6 my $q = new CGI; 7 8 my $filename = $q->param('/home/yifangt/hello.cgi'); 9 my $contenttype = $q->uploadInfo($filename)->{'Content-Type'}; 10...

7. Web Development

problem with exporting vairable from one perl cgi to another perl cgi script while redirecting.

Can anyone tell me how to export a variable from one perl CGI script to another perl cgi script when using a redirect. Upon running the login.pl the user is prompted to enter user name and password. Upon entering the correct credentials (admin/admin) the user is redirected to welcome page. My...

8. Programming

CGI Perl script to execute bash script- unable to create folder

Hi I have a bash script which takes parameters sh /tmp/gdg.sh -b BASE-NAME -n 1 -s /source/data -p /dest/data/archive -m ARC gdg.sh will scan the /source/data and will move the contents to /dest/data/archive after passing through some filters. Its working superb from bash I have...

9. Shell Programming and Scripting

Perl CGI : unable to download the excel sheet from perl cgi page

Hi All, I have written an cgi perl script that displays an image(Excel image) and when clicked on that Image I need to download a excel sheet. I made sure that excel sheet exists in the folder with the given name but still I am not able to download the sheet. print "<center><table...

10. Shell Programming and Scripting

Not able to copy the file in perl cgi script

Hello experts, I am facing an very typical problem and hope the issue can be solved. I have a page download.cgi in /cgi-bin folder. use CGI; use CGI::Carp qw ( fatalsToBrowser ); use File::Copy copy("C:\\Program Files\\Apache Software...

LEARN ABOUT DEBIAN

plack::handler::cgi

Plack::Handler::CGI(3pm)				User Contributed Perl Documentation				  Plack::Handler::CGI(3pm)

NAME

       Plack::Handler::CGI - CGI handler for Plack

SYNOPSIS

       Want to run PSGI application as a CGI script? Rename .psgi to .cgi and change the shebang line like:

	 #!/usr/bin/env plackup
	 # rest of the file can be the same as other .psgi file

       You can alternatively create a .cgi file that contains something like:

	 #!/usr/bin/perl
	 use Plack::Loader;
	 my $app = Plack::Util::load_psgi("/path/to/app.psgi");
	 Plack::Loader->auto->run($app);

       This will auto-recognize the CGI environment variable to load this class.

       If you really want to explicitly load the CGI handler, you can. For instance you might do this when you want to embed a PSGI application
       server built into CGI-compatible perl-based web server:

	 use Plack::Handler::CGI;
	 Plack::Handler::CGI->new->run($app);

DESCRIPTION

       This is a handler module to run any PSGI application as a CGI script.

UTILITY METHODS

   setup_env()
	 my $env = Plack::Handler::CGI->setup_env();
	 my $env = Plack::Handler::CGI->setup_env(\%override_env);

       Sets up the PSGI environment hash for a CGI request from %ENV> and returns it.  You can can provide a hashref of key/value pairs to
       override the defaults if you would like.

SEE ALSO

       Plack

perl v5.14.2							    2011-06-22						  Plack::Handler::CGI(3pm)