Below the code is a rough breakdown of the TXT file I am pulling in from.
I ran a basic perl -c on this to see any syntax errors, and I got back a
"Global symbol "@semm_count" requires explicit package name at Line 24.
So I apparently have that variable set wrong, but I am not sure how. I am missing some larger piece and not sure what it is or how to get it to click in my head, I am thinking about this way to much. SQL wasn't this hard to pick up and neither was Flash or Javascript
All I need to get this to do is display:
Seminar Name: Number registered:
1 2
2 3
3 1
4 2
total Students registered: 8
Code:
#!c:/perl/bin/perl.exe
#super.cgi - saves form data to a file, and creates a dynamic
#Web page that displays a message and survey statistics
print "Content-type: text/html\n\n";
use CGI qw(:standard);
use strict;
#declare variables
my ($name, $semm, @records);
#my @semm_count = (0, 0, 0, 0);
my %semm_count = ("1", 0,
"2", 0,
"3", 0,
"4", 0);
#calculate survey statistics
open(INFILE, ">>", "c05ex5.txt")
or die "Error opening c05ex5.txt. $!, stopped";
@records = <INFILE>;
close(INFILE);
foreach my $rec (@records) {
chomp($rec);
($name, $semm) = split(/,/, $rec);
$semm_count[$semm] = $semm_count[$semm] + 1;
}
#generate HTML acknowledgment
print "<HTML><HEAD><TITLE>WKRK-TV</TITLE></HEAD>\n";
print "<BODY>\n";
print "<H2>Seminar Total</H2>\n";
print "<TABLE>\n";
print "<TR><TD>Seminar</TD> <TD>Total</TD></TR>\n";
foreach my $key ("Computer Maintenance", "Microsoft Office", "Unix Essentials", "CGI/PErl") {
print "<TR><TD>$key</TD> <TD>$semm_count{$key}</TD></TR>\n";
}
print "</TABLE>\n";
print "</BODY></HTML>\n";
Text file:
StudentA,1
StudentB,2
StudentC,3
StudentD,4
StudentE,1
StudentF,2
StudentG,2
StudentH,4
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)
Can any body help me with apache and cgi
i'dont know how iconfigure apache to use cgi...
and when i try to start apachectl it says there is no file...
please help me...i have apache installed... (1 Reply)
hi expert,
I am totally new to perl CGI coding. And stop by below issue:
1> i have a script names conn.pl, which can connect to mysql and get the information of table user(id,name)
2> i copied above code into one CGI web page named user.cgi
3> when i view user.cgi in web browser, it toldme... (3 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,
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
#!/usr/bin/perl
use CGI qw/:standard/;
use Storable;
use Data::Dumper;
my... (1 Reply)
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 CENTOS
appconfig::cgi
AppConfig::CGI(3) User Contributed Perl Documentation AppConfig::CGI(3)NAME
AppConfig::CGI - Perl5 module for processing CGI script parameters.
SYNOPSIS
use AppConfig::CGI;
my $state = AppConfig::State->new(\%cfg);
my $cgi = AppConfig::CGI->new($state);
$cgi->parse($cgi_query);
$cgi->parse(); # looks for CGI query in environment
OVERVIEW
AppConfig::CGI is a Perl5 module which implements a CGI interface to AppConfig. It examines the QUERY_STRING environment variable, or a
string passed explicitly by parameter, which represents the additional parameters passed to a CGI query. This is then used to update
variable values in an AppConfig::State object accordingly.
AppConfig::CGI is distributed as part of the AppConfig bundle.
DESCRIPTION
USING THE AppConfig::CGI MODULE
To import and use the AppConfig::CGI module the following line should appear in your Perl script:
use AppConfig::CGI;
AppConfig::CGI is used automatically if you use the AppConfig module and create an AppConfig::CGI object through the cgi() method.
AppConfig::CGI is implemented using object-oriented methods. A new AppConfig::CGI object is created and initialised using the new()
method. This returns a reference to a new AppConfig::CGI object. A reference to an AppConfig::State object should be passed in as the
first parameter:
my $state = AppConfig::State->new();
my $cgi = AppConfig::CGI->new($state);
This will create and return a reference to a new AppConfig::CGI object.
PARSING CGI QUERIES
The "parse()" method is used to parse a CGI query which can be specified explicitly, or is automatically extracted from the "QUERY_STRING"
CGI environment variable. This currently limits the module to only supporting the GET method.
See AppConfig for information about using the AppConfig::CGI module via the cgi() method.
AUTHOR
Andy Wardley, "<abw@wardley.org<gt">
COPYRIGHT
Copyright (C) 1997-2007 Andy Wardley. All Rights Reserved.
Copyright (C) 1997,1998 Canon Research Centre Europe Ltd.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
AppConfig, AppConfig::State
perl v5.16.3 2007-05-30 AppConfig::CGI(3)