) etc.
Haven't been able to make the script work properly yet as apache throws
errors immediately when I pass the database handle between the classes.
Cheers,
Joni
-Original Message-
From: Bob Showalter [mailto:[EMAIL PROTECTED]]
Sent: 09 July 2002 15:00
To: 'PURMONEN, Joni'; '[EMAIL
Hello all,
I just moved my perfectly functioning script from normal CGI area to
mod_perl area and the whole thing stopped working.
This is the first time when I am using multiple classes and inheritance in
mod_perl and it seems like the inheritance is the culprit. I tried to search
the web for
Need to see the script and the error messages. Is Apache::Registry the
handler?
Yes it is.
The error messages just complain about not being able to locate a given
method, which should be inherited (and is inherited if I move the script to
CGI area).
the script runs to couple thousand lines,
Hi all,
This is probably the nices thing one can do at work: my boss asked me to
find out good quality perl training for intermediate - advanced perl in UK.
After a lot of searching around none of the places i found really convinced.
Can anyone recommend any places?
Or do I have to fly over
hey, Yet Another Finn here as well (although currently stuck in Oxford,
UK...).
Joni
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: 11 November 2001 19:15
To: [EMAIL PROTECTED]
Subject: Re: Off-Topic (200%) - Where are you from?
On Fri, 9 Nov 2001, Etienne
I don't think you need to do regex here. I don't have a perl machine here
right now so I can just give you pointers:
use split to get the separate words into strings, then go trough those
strings and do
ucfirst $string;
this will return you the string with first letter uppercased and put them
I'm a newbie myself, but if I understand you correctly, you just need to
check if the SQL query returns a defined value?
simply:
if (!defined($sql)){
do something...
}
else {
do something else
}
or:
print sorry if !defined($sql);
print Yippee if defined($sql);
Joni
-Original
using a separate module is a good idea in this kind of situation.
Put your subroutine to a separate file with the following format:
package packagename;
sub blaa {
code...code...code...
}
1; # So that the module will return a true value
__END__
Save this as packagename.pm and that's it.
Would it be at all possible to create PDF files on the fly using perl? I'm
thinking are there any modules which would do the job and does anyone have
any experience in using them?
Any pointers would be greatly appreciated.
I'm running the stuff on solaris 5.6 if that makes a difference...
Many
yep, couple of ways, placeholders being the best ones. Slurp the data into a
string and then
$sql = qq(UPDATE whatever
SET this = ?
WHERE id =?);
$sth=$dbh-prepare($sql);
$sth-execute($this,$id);
This way you do not need to worry about
[mailto:[EMAIL PROTECTED]]
Sent: 18 July 2001 18:04
To: PURMONEN, Joni; [EMAIL PROTECTED]
Subject: Re: Think there is something DBI
that would work if it where a little insert but this is what the insert
looks like
$SQL_UP = qq`
Insert into $DB_Table
(firstname,lastname,title,phone,email,age
Would a simple check of refering URL help in this?
Something like:
my $referer = $ENV{'HTTP_REFERER'};
if ($referer ne http://www.your/form/location;){
print qq(Content-type: text/html\n\n
some error message...);
return;
}
Are there any other relatively simple checks which would help
I always end them with
1;
__END__
so the package returns a true value...
and
package Packagename;
to the top.
Joni
-Original Message-
From: Nick Transier [mailto:[EMAIL PROTECTED]]
Sent: 15 June 2001 14:41
To: [EMAIL PROTECTED]
Subject: Packages
Do you have to end packages with
13 matches
Mail list logo