Hi,
Am unfamiliar with using CGI modules in Perl.
Though i checked in few sites about CGI , i dint get a clear idea.
Can anyone please explain me the purpose of these statements, it ll be very helpful to me
Code:
#!/usr/bin/perl
use CGI qw/:standard/;
use Storable;
use Data::Dumper;
my $variable = {};
$variable->{data}->{file} = retrieve("$variable->{sys}->{datadir}/file.storable.current");
{
statements....
}
for my $sgroup (keys(%{$variable->{data}->{net}->{sgroups}}))
{
statements
}
if ($globals->{data}->{net}->{sgroups}->{$sgroup}->{$servername}->{$serverport} eq $server) {
statements
}
%{$variables->{switches}} = map {
my @values = para($_);
$_ => $#values
? \@values
: $values[0]
} param();
for my $server (@{$servicegroups->{$servicegroup}})
{
statments
}
Thanks in advance
Moderator's Comments:
code tags work much better than do quote tags.
Last edited by jim mcnamara; 09-25-2012 at 01:47 PM..
my box is FreeBSD4.3 and I use Perl 5.0005_03.
Here is the CGI script.
test.cgi
......
if ($query->action eq 'detail') {
......
print $query->hidden('action', 'modify');
......
}
I found that the result of
test.cgi?action=detail
is not what I expected.
the script does not... (4 Replies)
hi everyone,
i am learning CGI using Perl, but i am having problem to compile and run the scripts.
the thing is that, when i want to compile my scripts i have to get connected to the internet and have to upload the scripts to a server and then only i can compile and run my scripts.
so, can... (2 Replies)
Hi,
In my cgi script(written in Perl using cgi.pm) i have a checkbox and i want all the items to be checked. Here is what i use:
checkbox_group(-name=>'studenten_in_groep', -values=>\@member_keys, -defaults=>\@member_keys, -labels=>\%temp_members, -columns=>2),
But no boxes are checked...... (18 Replies)
Hi All,
This is quite a high level question so I appologise as if it sounds a bit woolly!
I'm running a script via apache's cgi-bin that calls another Perl script (from a browser):
http://192.168.000.000/cgi-bin/run_script.pl?SCRIPT=test.pl&text=RANDOM+TEXT&INPUT1=444444444444
This... (4 Replies)
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... (3 Replies)
Hi team,
I have a typical problem with cgi pages in apache webserver in WINDOWS
I am able to execute(display) the pages that are saved in cgi-bin folder.
But I am not able to execute the pages stored in htdocs or other folder other than cgi-bin folder.
Could anyone please let me know how... (1 Reply)
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... (2 Replies)
Hi Team,
I am trying to connect to database(succeeded ) and print the records on the browser using while loop. But the elements of array are not displayed instead while loop is displayed directly. Instead of the below I can embed html statements in print but I am looking for the below style as I... (1 Reply)
I am trying to get my MacBook Pro with 10.8 Mt Lion set up to run Perl CGI scripts.
Having a problem. I can start Apache Web Server with no problems.
Why do I put the static and dynamic scripts? I which directory?
I have looked at this article:... (3 Replies)
Hello All,
I am actually learning PERL and more interested to learn CGI script too. Can any suggest a forum or weblink which is more helpful for a dummy CGI developer.
Thanks (6 Replies)
Discussion started by: posix
6 Replies
LEARN ABOUT SUSE
template::plugin::cgi
Template::Plugin::CGI(3) User Contributed Perl Documentation Template::Plugin::CGI(3)NAME
Template::Plugin::CGI - Interface to the CGI module
SYNOPSIS
[% USE CGI %]
[% CGI.param('parameter') %]
[% USE things = CGI %]
[% things.param('name') %]
# see CGI docs for other methods provided by the CGI object
DESCRIPTION
This is a very simple Template Toolkit Plugin interface to the "CGI" module. A "CGI" object will be instantiated via the following
directive:
[% USE CGI %]
"CGI" methods may then be called as follows:
[% CGI.header %]
[% CGI.param('parameter') %]
An alias can be used to provide an alternate name by which the object should be identified.
[% USE mycgi = CGI %]
[% mycgi.start_form %]
[% mycgi.popup_menu({ Name => 'Color'
Values => [ 'Green' 'Black' 'Brown' ] }) %]
Parenthesised parameters to the "USE" directive will be passed to the plugin constructor:
[% USE cgiprm = CGI('uid=abw&name=Andy+Wardley') %]
[% cgiprm.param('uid') %]
METHODS
In addition to all the methods supported by the "CGI" module, this plugin defines the following.
params()
This method returns a reference to a hash of all the "CGI" parameters. Any parameters that have multiple values will be returned as lists.
[% USE CGI('user=abw&item=foo&item=bar') %]
[% CGI.params.user %] # abw
[% CGI.params.item.join(', ') %] # foo, bar
AUTHOR
Andy Wardley <abw@wardley.org> <http://wardley.org/>
COPYRIGHT
Copyright (C) 1996-2007 Andy Wardley. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
Template::Plugin, CGI
perl v5.12.1 2008-11-13 Template::Plugin::CGI(3)