For what it is worth, I highly recommend this book. I just bought it
this past saturday, and I love it. It is written as if it was designed
to a student/instructer. (Props to Randal, and Tom)
Kristofer
--- drieux [EMAIL PROTECTED] wrote:
On Monday, Aug 25, 2003, at 09:30 US/Pacific, Jattie
sub Log{
my $message = shift();
my $LOGNAME = 'log.log';
open(LOGFILE, $LOGNAME) or die(Could not open log file: $!);
print LOGFILE $message;
close(LOGFILE);
}
sub Print{
my message = shift(); #Assuming you are passing a string
my $Out = *STDOUT; # Standard out.
print $Out
You should never be able to guess the implementation language by
looking at a URL. Wrong. Wrong.
I couldn't agree more. None of my scripts are executed directly...IE
there is not script called 'index.pl'. Alternatly, I use HTML::Mason
for dynamic web content. The Mason handler calls the
This is what I do for security on my webserver. I don't have the
shebang line in my scripts. The webserver has a list of approved perl
script extensions. When it runs across a file with this extension, the
web server executes it with perl. Otherwise, it treats the file as if
it is text/html.
Marcus,
You are going to have to URL escape it. Review URI::Escape...
http://theoryx5.uwinnipeg.ca/CPAN/data/URI/URI/Escape.html
Thanks,
Kristofer
=
-BEGIN GEEK CODE BLOCK-
Version: 3.12
GIT d s+:++ a C++ UL++ US+ P+++ L++
W+++ w PS PE t++ b+ G e r+++ z
--END GEEK CODE
Fine, go get the SendMail book, rent a truck to bring it home in,
A very large truck, OR the Abridged version.
The box said 'Windows XP or better' so I chose Mac OS X.
Must have been a trick requirement. Nearly everything is better.
=
-BEGIN GEEK CODE BLOCK-
Version: 3.12
GIT d
B,
Please post the entire code base of envir.pl. Feel free to obfuscate
any data that it requires. I cannot get the code you posted to fail.
There is something amiss, and we need to see the code to help.
Kristofer.
--- B. Fongo [EMAIL PROTECTED] wrote:
Hello,
I'm working on my first
--- Nigel Peck - MIS Web Design [EMAIL PROTECTED] wrote:
Can someone please remind a forgetful idiot how to get the name of
the script being run (the file itself)?
Cheers,
Nigel
MIS Web Design
http://www.miswebdesign.com/
print Full File name: $0\n;
Forgetfulness does not
Mark,
I get this...
color = brown, animal = fox
--- mark sony [EMAIL PROTECTED] wrote:
Hi All,
Can anyone plz explain to me why this one is not working :
$_ = The brown fox jumps over the lazy dog;
/the (\S+)(?{ $color = $^N }) (\S+)(?{ $animal = $^N })/i;
print color =
Rob,
The problem is in the permissions of the user id that is running the
script, not the owner of the script. In this case, your webserver is
the person running the script. So more than likely, you should use
'clearpq.cgi' to kick off a different script 'clearpl.pl' as ROOT. The
script
Susan,
Since everything you wrote only contains forward slashes ('/'), I am
a bit confused as to what you are trying to do. Are you trying to
convert the forward slashes to back slashes ('\')?
$dir =~ s!//!\\!g;
Please clarify what you are trying to do:(
Kristofer
--- Susan Aurand
:
On Tuesday, June 17, 2003, at 04:21 PM, Kristofer Hoch wrote:
Here you assign element[0] of @_ to $selectName. Then you assign
all
remaining elements (indexes 1 through infinity) to @selectValues.
@selectValues slurps up all remaining elements of @_ leaving poor
little $selection
David,
I the reason this worked for Scot and not you is something that is
both simple and EASILY OVERLOOKED. Consider the lines.
#Scot
if ($_ == 1) {
^^--- Scot is using a comparison operator
#David
if ($_[0]=1) {
^-- You are using an assignment operator.
So in
split /p align=\center\/, $_
instead of matching p (space) a,l,i,g,n,=, \,c,e,n,t,e,r\
embrace it in parenthesis...no escaping neccessary...
split /(p align=center)/, $_
At least I think that I am reading this book properlyh
--- Scot Robnett [EMAIL PROTECTED] wrote:
I was wondering
David,
Try something a bit different
===
use DBI;
# Added: This will probably break you in lots of
places,
# but use strict is worth it.
use strict;
# Strict on $infile
my $infile = /cadfs8/sys/dnazary/mysql_test_data1;
# Strict on $dbh
my $dbh =
The answer to this one may seem a bit simplistic, but
bear with me please. The 'main' frame should be a cgi
script that does not ever change. You want the
behaviour of this frame to change by passing
parameters.
The main file could be named main.pl and accept
parameters such as doLogin if they
Rob,
Have you considered useing the object oriented
method? It is a little bit more complicated, BUT it
will work.
use strict;
use warnings
use CGI;
my $CgiObject = new CGI;
my $STRING = There are not any trains running on thi
day.brUse the date dropdowns above to select
adifferent day.;
my
David,
You don't have a response set at execute. You have
a reference to a responce set. You need to use DBI
methods to access the results. Try this...
$response-execute();
my $hash = {};
while (my $rows = $response-fetchrow_hashref){
got the hang of the
logic yet.
Dave
On Thursday, June 5, 2003, at 07:25 pm, Kristofer
Hoch wrote:
David,
You don't have a response set at execute. You
have
a reference to a responce set. You need to use
DBI
methods to access the results. Try
This is possibly the best answer. I won't give any
other.
--- drieux [EMAIL PROTECTED] wrote:
On Thursday, Jun 5, 2003, at 13:07 US/Pacific,
Andrew Brosnan wrote:
[..]
my $hash = {};
while (my $rows = $response-fetchrow_hashref){
$hash-{$rows-{task_ID}} = $rows;
}
Why is
What sometimes helps me is this... Add a domain.
-domain = '.some.com',
--- Ahrent [EMAIL PROTECTED] wrote:
Hi Im looking for a function/module to check if
visitors have their cookies enabled when they come
to my site.
I think that there might all-ready might be a
module for this, but I
CURDATE() has to be selected
SELECT(CURDATE());
--- Bob Showalter [EMAIL PROTECTED]
wrote:
Greenhalgh David wrote:
...
Second question. If I use the following:
my $query=CURDATE();
my $sth-prepare($query);
$sth-execute;
I understand that $sth now just contains the
reference to
the variables with
there previous values. Something to watch/test for...
~Brian
On Wednesday 26 June 2002 11:21, Kristofer Hoch wrote:
Hi all,
Please forgive the simple nature of this question. I have never really
used regular expression extensivly.
Here goes. I am trying to extract
Hi all,
Please forgive the simple nature of this question. I have never really
used regular expression extensivly.
Here goes. I am trying to extract a number from in between two
parenthesis. I want the first value I find (from right to left) in a string.
These numbers could be phone
803 without the enclosing parens?
Thank you
Kristofer
Original Message Follows
From: [EMAIL PROTECTED]
To: Kristofer Hoch [EMAIL PROTECTED], [EMAIL PROTECTED]
Subject: Re: Extract numbers from in between parentheses with regex
Date: Wed, 26 Jun 2002 11:26:23 -0600
PROTECTED]
To: perl beginners cgi [EMAIL PROTECTED]
CC: Kristofer Hoch [EMAIL PROTECTED]
Subject: Re: Extract numbers from in between parentheses with regex
Date: Wed, 26 Jun 2002 14:03:52 -0500
Kristofer --
and then Kristofer Hoch said...
%
% David,
% Thank you very much for your help. Don't
Aman,
I think that we are going to need same sample code. I can't get this to
happen.
Thanks
Kristofer
Original Message Follows
From: aman cgiperl [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: file read and then write problem
Date: Mon, 10 Jun 2002 13:09:54 -0500
Hi all
I posted
testsystemTest System 3/testsystem
/Other
/Other
/Testing
Again I am sorry for my grammar and cloudly descriptions.
Kristofer Hoch
Original Message Follows
From: Theuerkorn Johannes [EMAIL PROTECTED]
To: 'kris hoch' [EMAIL
Try O'Reilly's MySql mSQL. Also use the Online reference at www.mysql.org
(documentation, MySQL APIs)
Kristofer
Original Message Follows
From: Maureen E Fischer [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: Perl/CGI mysql book
Date: Wed, 5 Jun 2002 11:12:13 -0700
I am writing
29 matches
Mail list logo
