05-21-2013
Could anyone please let me know what went wrong with the code.....
thanks in advance.....
Regards,
J
9 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
Hi,
I am doing this perl script
print (@line(1..15));
the lines 1 to 15 get printed...
how can i redirect this to file?
thanks and regards
vivek.s (4 Replies)
Discussion started by: vivekshankar
4 Replies
2. Solaris
Hi
I am getting the uptime output as follows
12:40am up 4 day(s), 18:29, 2 users, load average: 38.97, 36.54, 34.89
The load average is too high .
I have checked the processes , but no process is taking too much cpu time
Please help (3 Replies)
Discussion started by: guy009
3 Replies
3. Solaris
Hi,
I have written a service script(service.sh) for my application which will add my application(BTINM) as service and start the service. Internally inside the script i will call the sh script which will start my application server. When my application server starts a UI opens saying that the... (5 Replies)
Discussion started by: krevathi1912
5 Replies
4. UNIX for Dummies Questions & Answers
how send an rtf file as inline body of email (not as an attachment)
sendmail/mailx < test.rtf is not working (7 Replies)
Discussion started by: srik_ux
7 Replies
5. Solaris
i am using this way to create zone1 and zone2
bash-2.05b# zonecfg -z zone1
zone1: No such zone configured
Use 'create' to begin configuring a new zone.
zonecfg:zone1> create
zonecfg:zone1> set zonepath=/zone/1
zonecfg:zone1> set autoboot=true
zonecfg:zone1> add net
zonecfg:zone1:net>... (6 Replies)
Discussion started by: coxmanchester
6 Replies
6. Shell Programming and Scripting
can u plz tell me where is the error
echo enter the filename to be searched
read fname
if #-d $fname
then
echo file exists
if
then
echo itsa directory
elif
then
echo its readable
cat $fname
else
echo its not readable
fi
else
... (1 Reply)
Discussion started by: gotam
1 Replies
7. Shell Programming and Scripting
When I did,
echo $SHELL in cmd prompt of putty,
its displaying /bin/sh
And in my shell script.,
I hav started with.,
#!/bin/sh
and
i=1;
while ;
do
.
.
.
i=$; (9 Replies)
Discussion started by: av_vinay
9 Replies
8. Shell Programming and Scripting
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary=border
--border
Content-Type: text/html
Content-Disposition: inline
<html><body><h2>This text should be displayed with html formatting</h2></body></html>
--border
Content-Type: text/plain
Content-Disposition: attachment
This text... (2 Replies)
Discussion started by: thulasidharan2k
2 Replies
9. AIX
Hi,
I am able to login using su - or su directly ,
# prompt is coming, it doesnt ask for password.
any normal user on aix system is login using su - or su .
Please suggest where to change the configuration
direct root login is disabled in /etc/ssh/sshd_config file. (0 Replies)
Discussion started by: manoj.solaris
0 Replies
LEARN ABOUT DEBIAN
cgi::emulate::psgi
CGI::Emulate::PSGI(3pm) User Contributed Perl Documentation CGI::Emulate::PSGI(3pm)
NAME
CGI::Emulate::PSGI - PSGI adapter for CGI
SYNOPSIS
my $app = CGI::Emulate::PSGI->handler(sub {
# Existing CGI code
});
DESCRIPTION
This module allows an application designed for the CGI environment to run in a PSGI environment, and thus on any of the backends that PSGI
supports.
It works by translating the environment provided by the PSGI specification to one expected by the CGI specification. Likewise, it captures
output as it would be prepared for the CGI standard, and translates it to the format expected for the PSGI standard using CGI::Parse::PSGI
module.
CGI.pm
If your application uses CGI, be sure to cleanup the global variables in the handler loop yourself, so:
my $app = CGI::Emulate::PSGI->handler(sub {
use CGI;
CGI::initialize_globals();
my $q = CGI->new;
# ...
});
Otherwise previous request variables will be reused in the new requests.
Alternatively, you can install and use CGI::Compile from CPAN and compiles your existing CGI scripts into a sub that is perfectly ready to
be converted to PSGI application using this module.
my $sub = CGI::Compile->compile("/path/to/script.cgi");
my $app = CGI::Emulate::PSGI->handler($sub);
This will take care of assigning an unique namespace for each script etc. See CGI::Compile for details.
You can also consider using CGI::PSGI but that would require you to slightly change your code from:
my $q = CGI->new;
# ...
print $q->header, $output;
into:
use CGI::PSGI;
my $app = sub {
my $env = shift;
my $q = CGI::PSGI->new($env);
# ...
return [ $q->psgi_header, [ $output ] ];
};
See CGI::PSGI for details.
METHODS
handler
my $app = CGI::Emulate::PSGI->handler($code);
Creates a PSGI application code reference out of CGI code reference.
emulate_environment
my %env = CGI::Emulate::PSGI->emulate_environment($env);
Creates an environment hash out of PSGI environment hash. If your code or framework just needs an environment variable emulation, use
this method like:
local %ENV = (%ENV, CGI::Emulate::PSGI->emulate_environment($env));
# run your application
If you use "handler" method to create a PSGI environment hash, this is automatically called in the created application.
AUTHOR
Tokuhiro Matsuno <tokuhirom@cpan.org>
Tatsuhiko Miyagawa
COPYRIGHT AND LICENSE
Copyright (c) 2009-2010 by tokuhirom.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
SEE ALSO
PSGI CGI::Compile CGI::PSGI Plack CGI::Parse::PSGI
perl v5.14.2 2012-03-18 CGI::Emulate::PSGI(3pm)