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 need to include javascripts and jqueries too.
Could anyone please let me know how to modify the below script(in html tags only) to print the contents of the array.
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,
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 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)
I have been trying to get this for weeks now but maybe someone knows or has a snippet of code to display a collapsible tree view.
something like this:
+Yahoo!
-/site.html
-/site2.html
+Google
-/site.php
-/site2.php (1 Reply)
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)
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)
Discussion started by: djehresmann
3 Replies
LEARN ABOUT DEBIAN
netsds::dbi
NetSDS::DBI(3pm) User Contributed Perl Documentation NetSDS::DBI(3pm)NAME
NetSDS::DBI - DBI wrapper for NetSDS
SYNOPSIS
use NetSDS::DBI;
$dbh = NetSDS::DBI->new(
dsn => 'dbi:Pg:dbname=test;host=127.0.0.1;port=5432',
login => 'user',
passwd => 'topsecret',
);
print $db->call("select md5(?)", 'zuka')->fetchrow_hashref->{md5};
DESCRIPTION
"NetSDS::DBI" module provides wrapper around DBI module.
CLASS API
new(%params) - class constructor
$dbh = NetSDS::DBI->new(
dsn => 'dbi:Pg:dbname=test;host=127.0.0.1;port=5432',
login => 'user',
passwd => 'topsecret',
);
dbh() - DBI connection handler accessor
Returns: DBI object
This method provides accessor to DBI object and for low level access to database specific methods.
Example (access to specific method):
my $quoted = $db->dbh->quote_identifier(undef, 'auth', 'services');
# $quoted contains "auth"."services" now
call($sql, @bind_params) - prepare and execute SQL query
Method "call()" implements the following functionality:
* check connection to DBMS and restore it
* prepare chached SQL statement
* execute statement with bind parameters
Parameters:
* SQL query with placeholders
* bind parameters
Return:
* statement handler from DBI
Example:
$sth = $dbh->call("select * from users");
while (my $row = $sth->fetchrow_hashref()) {
print $row->{username};
}
fetch_call($sql, @params) - call and fetch result
Paramters: SQL query, parameters
Returns: arrayref of records as hashrefs
Example:
# SQL DDL script:
# create table users (
# id serial,
# login varchar(32),
# passwd varchar(32)
# );
# Now we fetch all data to perl structure
my $table_data = $db->fetch_call("select * from users");
# Process this data
foreach my $user (@{$table_data}) {
print "User ID: " . $user->{id};
print "Login: " . $user->{login};
}
begin() - start transaction
commit() - commit transaction
rollback() - rollback transaction
quote() - quote SQL string
Example:
# Encode $str to use in queries
my $str = "some crazy' string; with (dangerous characters";
$str = $db->quote($str);
INTERNAL METHODS
_add_sets() - add initial SQL query
Example:
$obj->_add_sets("set search_path to myscheme");
$obj->_add_sets("set client_encoding to 'UTF-8'");
_add_attrs() - add DBI handler attributes
$self->_add_attrs(AutoCommit => 1);
_check_connection() - ping and reconnect
Internal method checking connection and implement reconnect
_connect() - connect to DBMS
Internal method starting connection to DBMS
EXAMPLES
samples/testdb.pl
SEE ALSO
DBI, DBD::Pg
TODO
1. Make module less PostgreSQL specific.
AUTHOR
Michael Bochkaryov <misha@rattler.kiev.ua>
LICENSE
Copyright (C) 2008-2009 Net Style Ltd.
This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation,
Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
perl v5.10.1 2010-04-28 NetSDS::DBI(3pm)