At 09:34 PM 06/26/2001 -0700, MRossland wrote:
>Hi all,
>
>Here's my goal: To take information via a form, encrypt it with a duel key
>encryption, and then write that encrypted message to a text file for latter
>use. I also need to do this in such a way so that the server admin's can't
>read it (I
Hi all,
Here's my goal: To take information via a form, encrypt it with a duel key
encryption, and then write that encrypted message to a text file for latter
use. I also need to do this in such a way so that the server admin's can't
read it (I work for a credit union, and regulations are stiff).
I hope this will give you a better understanding of how my script is
running:
#!/usr/bin/perl
use strict;
use CGI qw/:standard/;
print header( -status => '204 No Content' );
open(CU, '/usr/bin/cu');
print(CU "-s 9600 /dev/term/a\n");
close(CU);
open(DEV, '>>/dev/term/a') or die "Couldn't ope
Odd, it still gives me "500..." but now this time the script wont work.
-Original Message-
From: Curtis Poe [mailto:[EMAIL PROTECTED]]
Sent: Monday, June 25, 2001 12:59 PM
To: CGI Beginners
Subject: RE: CGI Return
--- Paul Burkett <[EMAIL PROTECTED]> wrote:
> I'm running Solaris 7, it i
Everything I try I get the same error! I've tried using 'use CGI' but still
nothing. I found a command that works it's called "HTTP Command 204" but how
do I implement this into the script? And where do I put the "Content:" line
in?
> "Philip" == Philip Peeters <[EMAIL PROTECTED]> writes:
Philip> %newdata = ();
Philip> $newdata{$TAG} = $co->param('account');
Philip> $newdata{$TAG}[0] = $co->param('initsearch');
Philip> $newdata{$TAG}[1] = $co->param('team');
Philip> $newdata{$TAG}[2] = $co->
--- Philip Peeters <[EMAIL PROTECTED]> wrote:
> %newdata = ();
> $newdata{$TAG} = $co->param('account');
> $newdata{$TAG}[initsearch] = $co->param('initsearch');
> $newdata{$TAG}[team] = $co->param('team');
> $newdata{$TAG}[website] = $co->param('website');
There are
On Tue, Jun 26, 2001 at 04:32:35PM -0700, Philip Peeters wrote:
: When my script is called, I parse in some variables. I want to build
: a hash where the one variable will function as the a key of the hash
: and the other variables must be referenced by again a reference.. Confused?
: Me too. Exam
Hi,
First of all thanks for the references to the Storables module to dump
a hash/array into a file so other cgi's can use this hash/array too.
It works great!
But I ran into another issue (I think it's just a syntax issue, but I'm
not sure I'm appraoching this correctly):
When my script is cal
--- Paul Burkett <[EMAIL PROTECTED]> wrote:
> wow the darn thing works! Hey Ovid, is it ok if I add your name to the list
> of contributers to my script? I'll also let you look at the script if you
> want toohell I'll let you see it in action at my website if you want to!
>
> The lines that i
wow the darn thing works! Hey Ovid, is it ok if I add your name to the list
of contributers to my script? I'll also let you look at the script if you
want toohell I'll let you see it in action at my website if you want to!
The lines that i needed were:
my $q = CGI->new("");
print $q->header
--- Paul Burkett <[EMAIL PROTECTED]> wrote:
> Ok, this is odd, I got it so it wont redirect the webpage, but now it won't
> change the camera. When I restore it to the original code it changes the
> camera but redirects the page to "500 Internet Server Error." Shouldn't
> STDIN work in CGI scripts
Ok, this is odd, I got it so it wont redirect the webpage, but now it won't
change the camera. When I restore it to the original code it changes the
camera but redirects the page to "500 Internet Server Error." Shouldn't
STDIN work in CGI scripts?
> although I *have*
> gotten into the habit of using "reply-all" instead of
> "reply-to", thus
> getting my mail out to its intended recipient, I receive
> multiple copies of
> the same post from other people who use "reply-all" and don't
> take out
> everybody's name from the To: field. I have r
omg,
tx yall... i just did a big boo boo...was rearranging my code and
system froze... no backups... BAHHHlemme get it back together
and i'll post it...
tx again..i'll be a while :((
RD
On Tue, 26 Jun 2001, RDWest Sr. wrote:
> #!perl
> ##***##
> ## MAIN ##
> ##***##
> require "setup.cfg";
> require "html.pl";
>
>
> &parsedata
> if ($INPUT{'signup'}) { &join; }
> else {&
This may seem like a simple task for those of us whom have some hands on experience
with Perl but, when I was starting out I couldn't ever get the cookie bit going. There
are lots of tutorials this is true. None however give simple step by step instruction
on creating, retrieving and deleting t
On Tue, Jun 26, 2001 at 02:07:15PM -0400, RDWest Sr. wrote:
: #!perl
: ##***##
: ## MAIN ##
: ##***##
: require "setup.cfg";
: require "html.pl";
:
:
: &parsedata
: if ($INPUT{'signup
#!perl
##***##
## MAIN ##
##***##
require "setup.cfg";
require "html.pl";
&parsedata
if ($INPUT{'signup'}) { &join; }
else {&html_home; }
exit;
someone explain what i'm doing wrong
Curtis Poe wrote:
>
> listed in 'CGI Programming with Perl', second edition, by O'Reilly (how the heck do
>you properly
> attribute a book, anyway? I can never remember):
you can't in an email, because the book title is supposed to be
underlined.
http://www.english.uiuc.edu/cws/wworkshop/bibl
On Tue, 26 Jun 2001, Philip Peeters wrote:
> I'm looking for the best way to store an array or hash in a file on disc,
> so it can be picked up by another cgi.
Check out the MLDBM module form CPAN. It basically ties a hash to a DBM
file, and further allows you to store complex data structures t
: I'm looking for the best way to store an array or hash in a file on disc,
: so it can be picked up by another cgi.
:
: I'm currently storing to a file where every line contains an element
: (and I know that every 6 lines contain a column in my array). But I find
: this rather...hmmmnot so
On Tue, 26 Jun 2001, David Simcik wrote:
> I'm looking for a way to maintain session-like state in my perl scripts
> running on IIS. While I'm certain I've seen modules for this under Apache,
> are there any equivalents under IIS? I certainly willing to look at
> workarounds as well. :-)
I
Hi,
I'm looking for the best way to store an array or hash in a file on disc,
so it can be picked up by another cgi.
I'm currently storing to a file where every line contains an element
(and I know that every 6 lines contain a column in my array). But I find
this rather...hmmmnot so elegant
--- David Simcik <[EMAIL PROTECTED]> wrote:
> Hi,
> I'm looking for a way to maintain session-like state in my perl scripts
> running on IIS. While I'm certain I've seen modules for this under Apache,
> are there any equivalents under IIS? I certainly willing to look at
> workarounds as well
Hello mark,
Tuesday, June 26, 2001, mark crowe (JIC) <[EMAIL PROTECTED]> wrote:
mcJ> Not entirely true. Try:
mcJ> $string = "0.0";
mcJ> print $string;
mcJ> - prints "0.0"
mcJ> Now try it without the quotes around 0.0
mcJ> - prints "0"
let's try another approach:
$s = "
At 08:51 26.06.2001 -0700, Curtis Poe wrote:
>Okay, maybe I'm just being silly, but I'm a bit tired of hitting "reply"
>instead of "reply all"
>and forgetting that my message wasn't sent to the list. While I want to
>help people who ask
>questions, I'd like this help to be available for all.
>
Hi,
I'm looking for a way to maintain session-like state in my perl scripts
running on IIS. While I'm certain I've seen modules for this under Apache,
are there any equivalents under IIS? I certainly willing to look at
workarounds as well. :-)
Thanks.
DTS
Not entirely true. Try:
$string = "0.0";
print $string;
- prints "0.0"
Now try it without the quotes around 0.0
- prints "0"
So there is a difference between strings and numbers. In the $counter case
it doesn't make any difference, but for the above case it could be important
- "
At 08:42 26.06.2001 -0700, Curtis Poe wrote:
> >
> > open (IN, "file") || die("Couldn't open file $!");
> > while()
> > {
> > chomp;
> > my @asLines = split(/[\t\s]+/, $_);
> > Load_Stat_Rec(\@asLines);
> > }
> > close IN;
>
>I'd be a trifle concerned a
Okay, maybe I'm just being silly, but I'm a bit tired of hitting "reply" instead of
"reply all"
and forgetting that my message wasn't sent to the list. While I want to help people
who ask
questions, I'd like this help to be available for all.
I think it would be a Good Thing to change the mail
--- Aaron Craig <[EMAIL PROTECTED]> wrote:
> At 14:44 25.06.2001 -0400, Brian Bukeavich wrote:
> >Thanks for the input.
> >My input data (which is coming out of a flat ascii file) looks similar to:
> >Jones, John 35 20 02 05/02/2001 F 060506050705040405047 11 04 01
> >Jones, John
Hello mark,
Tuesday, June 26, 2001, mark crowe (JIC) <[EMAIL PROTECTED]> wrote:
mcJ> If I might make one other little comment - I suggest you initialise $counter
mcJ> by $counter=0, rather than $counter="0"; The former makes it a number, the
mcJ> latter a string.
(jfyi only)
you are mistaken. al
At 14:44 25.06.2001 -0400, Brian Bukeavich wrote:
>Thanks for the input.
>My input data (which is coming out of a flat ascii file) looks similar to:
>Jones, John 35 20 02 05/02/2001 F 060506050705040405047 11 04 01
>Jones, John 35 20 02 05/09/2001 F 050604050705040405045 10 1
--- Francesco Scaglioni <[EMAIL PROTECTED]> wrote:
> Thanks and Hi again,
>
> Tried unescaping and got no joy so tried the following - still with no
> joy -any suggestions as to which obvious thing I am missing.
>
> #!/usr/bin/perl -w
> #
> # test script to query an mysql database
> #
> use stri
You boys are all going to have to figure this one out.
Consider it a learning experience.
-Original Message-
From: "Lucy"<[EMAIL PROTECTED]>
To: "Cochrane, Paul"<[EMAIL PROTECTED]>
Cc: [EMAIL PROTECTED]
Date: Tue Jun 26 03:58:03 PDT 2001
Subject: Re: Unsubscribing
>I have no idea why eve
Ah, PWS (Pretty Weak Stuff?). I've been in the same boat. There are
several odd things that have happened, and every time it turned out to be
that PWS was whacked out. The solution in all cases:
1. Remove PWS.
2. Reboot.
3. Re-install PWS.
Suddenly, voila, it works. In my case, it apparently
Yes, I agree with Christian about the fieldnames being quoted - I'd just
worked out the same thing here. Sorry, I though placeholders would work for
field names, obviously not.
If I might make one other little comment - I suggest you initialise $counter
by $counter=0, rather than $counter="0"; T
Francesco,
here is an amended and simplified version of your script that worked on my computer
30secs ago:
---< snip
#!/usr/bin/perl -w
#
# test script to query an mysql database
#
use strict;
use DBI;
my ($sql, $dbh, $sth, $field1, $value1, $field2, $value2, @rows, $counter);
print "Enter t
On Tue, 26 Jun 2001, Gary Stainburn <[EMAIL PROTECTED]> wrote,
> Hi all,
>
> I've written a perl script that creates PDF files containing our sales
> invoices and it works fine writing the PDF's to disk. (Actually it creates a
> postscript file and runs ps2pdf).
>
> I now want to embed this insid
The following still reports nil records (I know they are there -
honest!!).
TIA - Francesco
#!/usr/bin/perl -w
#
# test script to query an mysql database
#
use strict;
use DBI;
my ($sql, $dbh, $sth, $field1, $value1, $field2, $value2, @rows, $counter);
print "Enter the first fieldname (field1)
Hi all,
I've written a perl script that creates PDF files containing our sales
invoices and it works fine writing the PDF's to disk. (Actually it creates a
postscript file and runs ps2pdf).
I now want to embed this inside a CGI so people can view them on-line and
have their browser fire off a
I have no idea why everyone is finding it so hard to unsubscribe. :)
I have tried it once again, and had no problems.
1) send email to
[EMAIL PROTECTED]
(yes, substituting "username-somewhere.com" from your real address)
=)
2) you will receive an email with the subject "confirm unsubscribe
Take the safe option and assign the SQL query to a string before using it.
The placeholders are ok with this as well.
my $sql = qq(select * from testami where ? = ? and ? = ?);
$sth = $dbh -> prepare($sql);
$sth -> execute($field1, $value1, $field2, $value2);
#$sth -> execute();
Hope you didn
Thanks and Hi again,
Tried unescaping and got no joy so tried the following - still with no
joy -any suggestions as to which obvious thing I am missing.
#!/usr/bin/perl -w
#
# test script to query an mysql database
#
use strict;
use DBI;
my ( $dbh, $value1, $value2, $sth, @rows, $counter, $fiel
does anyone here have ever tried using perl - idc - htx (MS Access)
connection on a Windows via Personal Web Server? I don't know why I can't
get it done. I already installed the Active Perl kit, but it still won't do
any good.
_
Do You
Hi Francesco
I would guess that the problem is caused by you escaping the $ signs in your
SELECT statement (eg \$fields). Try using something like:-
$sth = $dbh -> prepare(qq{select * from testami where '$field1' =
'$value1' and '$field2' = '$value2'});
or at least remove the \ be
Me too. Please will someone remove me from this list?
-Original Message-
From: Derek Harding [mailto:[EMAIL PROTECTED]]
Sent: 26 June 2001 10:26
To: [EMAIL PROTECTED]
Subject: Unsubscribing
In company with Bernhard and others I am having immense problems getting
myself unsubscribed.
O
In company with Bernhard and others I am having immense problems getting
myself unsubscribed.
On one hand I get automated mail telling me to reply, which I duly do, then
it tells me I'm not subscribed but clearly, I am!
Dare I suggest that this part of the service is broken?
PLEASE take me of
"Until you execute it" is only true if you omit the prepare step. If you do a prepare
first all scalars are resolved at that point in time. After the prepare you can only
bind values to substitution parameters (if any), either through using one of the
bind_param functions or directly in the exe
Apologies for posting a small script. I created a little test table
with columns testname, testsex, testage and testcolour. The script
runs without errors yet the value of returned rows is always zero.
Please would someone be so kind as to point out the error of my ways.
TIA
Francesco
#!/usr/
You'll probably get a few of these, but the Llama book from O'Reilly &
Associates "Learning Perl" is the way to go.
Chris Hedemark - Hillsborough, NC
http://yonderway.com
- Original Message -
From: "Brian Jackson" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, June 25, 2001 10:
52 matches
Mail list logo
