[12633] in Perl-Users-Digest
Perl-Users Digest, Issue: 42 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jul 7 05:17:18 1999
Date: Wed, 7 Jul 1999 02:07:13 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 7 Jul 1999 Volume: 9 Number: 42
Today's topics:
perl string <makky@hongkong.com>
Re: perl string (Abigail)
Re: perl string (Mark-Jason Dominus)
Perl syntax <nospam@nospam.nospam>
Re: Perl syntax <swiftkid@bigfoot.com>
Re: Perl syntax <gellyfish@gellyfish.com>
perl to ms outlook task <shmuels@math.tau.ac.il>
Re: perl to ms outlook task (elephant)
Re: perl to ms outlook task <gellyfish@gellyfish.com>
Re: perl to ms outlook task (elephant)
Perl Unicode? <Anttoni@iname.com>
Re: Perl Unicode? (elephant)
Re: Perl Unicode? (Abigail)
Perl Usuage whos_john_galt@my-deja.com
Re: Perl Usuage (elephant)
Re: Perl Usuage (Bart Lateur)
Re: Perl Usuage (I R A Aggie)
Re: Perl Usuage (Jon Bell)
Re: Perl Usuage whos_john_galt@my-deja.com
PerlBuilder (Len Weaver)
Re: PerlBuilder <john.wood@diamond.co.uk>
Re: PerlBuilder bigcheese@my-deja.com
perlcc <swiftkid@bigfoot.com>
Re: perlcc <swiftkid@bigfoot.com>
PerlMagick and writing to STDOUT <orkid@iname.com>
Re: PerlMagick and writing to STDOUT (Abigail)
Re: PerlMagick and writing to STDOUT <orkid@iname.com>
PerlScript - Passing Parms to a Stored Procedure pkolis@lvwebmasters.com
PGP and Mail (Tony Greenwood)
Re: PGP and Mail (brian d foy)
Re: PGP and Mail (Tony Greenwood)
Re: PGP and Mail <walton@frontiernet.net>
Re: PGP and Mail (Tony Greenwood)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 05 Jul 1999 21:02:23 +0000
From: mak <makky@hongkong.com>
Subject: perl string
Message-Id: <37811D5F.D2491160@hongkong.com>
hi, just have a question - will a function return faster if it returns a
string reference instead of a string. thanks.
------------------------------
Date: 5 Jul 1999 22:56:49 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: perl string
Message-Id: <slrn7o2vjd.h6v.abigail@alexandra.delanet.com>
mak (makky@hongkong.com) wrote on MMCXXXIV September MCMXCIII in
<URL:news:37811D5F.D2491160@hongkong.com>:
,, hi, just have a question - will a function return faster if it returns a
,, string reference instead of a string. thanks.
I very much doubt you really want to know. If this kind of optimalization
is important to you, consider a different language, like XS or C.
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Tue, 06 Jul 1999 09:41:53 GMT
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: perl string
Message-Id: <7lsj03$7qo$1@monet.op.net>
In article <37811D5F.D2491160@hongkong.com>, mak <makky@hongkong.com> wrote:
> will a function return faster if it returns a
>string reference instead of a string.
No.
------------------------------
Date: Sat, 3 Jul 1999 21:08:08 +0800
From: "Calvin" <nospam@nospam.nospam>
Subject: Perl syntax
Message-Id: <7ll1ro$t8r$1@hfc.pacific.net.hk>
Hi,
Where can i find the syntax of Perl?? Is there any man page or online
documents?
--
Best regards
Calvin
http://www.geocities.com/SiliconValley/Code/9129/
------------------------------
Date: Sat, 3 Jul 1999 19:04:35 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: Re: Perl syntax
Message-Id: <7lm8is$9c96@news.cyber.net.pk>
> Hi,
> Where can i find the syntax of Perl?? Is there any man page or online
> documents?
http://language.perl.com/CPAN/doc/manual/html/pod/perl.html
------------------------------
Date: 4 Jul 1999 15:48:16 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Perl syntax
Message-Id: <7lnvo0$41b$1@gellyfish.btinternet.com>
On Sat, 3 Jul 1999 21:08:08 +0800 Calvin wrote:
> Hi,
> Where can i find the syntax of Perl?? Is there any man page or online
> documents?
>
Specifically the syntax of Perl is discussed in the perlsyn manpage.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Mon, 5 Jul 1999 12:21:41 +0100
From: "Irit Setmpler" <shmuels@math.tau.ac.il>
Subject: perl to ms outlook task
Message-Id: <7lpt8f$3qo$1@goethe.tau.ac.il>
Hello,
I'm in a mission:
I need to send, instead of e-mail msg, a "new task" to the ms outlook.
ms outlook running on exchange server, perl is running on the unix system.
sending e-mail is very easy and working but how to insert a new task to the
outlook using a perl script?
anyone knows the mechanism behind the "task" in ms outlook?
How can it be done?
thanks,
Irit
--
------------------------------
Date: Tue, 6 Jul 1999 00:06:12 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: perl to ms outlook task
Message-Id: <MPG.11eb66de3d611853989aeb@news-server>
Irit Setmpler writes ..
>anyone knows the mechanism behind the "task" in ms outlook?
>How can it be done?
you can start with the Win32::OLE module which enables you to create a
MAPI.Session object .. I've never done this - nor programmed MAPI .. but
MAPI is the API that Microsoft Exchange uses to publish its functionality
you will need to read about MAPI probably from Microsoft .. because once
the perl Win32::OLE module gets you in - you're on your own (ie.
Win32::OLE enables you to instantiate a MAPI.Session .. but the methods
and interraction with that session is determined by MAPI and so you will
not see that covered in any perl help)
btw .. you may want to read "Is there a way to access MAPI from my Perl
script?" in the perlwin32faq9 help file .. it's short but might help you
off to a quick start
--
jason - remove all hyphens for email reply -
------------------------------
Date: 5 Jul 1999 15:41:43 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: perl to ms outlook task
Message-Id: <3780c427@newsread3.dircon.co.uk>
elephant <e-lephant@b-igpond.com> wrote:
> Irit Setmpler writes ..
>>anyone knows the mechanism behind the "task" in ms outlook?
>>How can it be done?
>
> you can start with the Win32::OLE ...
>
Except of course he said 'perl is running on the unix system' and I dont
think that is going to work there ...
/J\
--
"If they want a circus, they have come to the right person" - Neil
Hamilton
------------------------------
Date: Tue, 6 Jul 1999 01:05:01 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: perl to ms outlook task
Message-Id: <MPG.11eb74a3c9910504989af0@news-server>
Jonathan Stowe writes ..
>Except of course he said 'perl is running on the unix system' and I dont
>think that is going to work there ...
aack .. didn't notice that (well I did and then forgot)
--
jason - remove all hyphens for email reply -
------------------------------
Date: Mon, 05 Jul 1999 15:45:15 +0300
From: anttoni Huhtala <Anttoni@iname.com>
Subject: Perl Unicode?
Message-Id: <3780A8DB.42E81D80@iname.com>
hi.
Dose eanyone know about the unicode on perl???
thnx.
Ansi
------------------------------
Date: Tue, 6 Jul 1999 00:23:05 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: Perl Unicode?
Message-Id: <MPG.11eb6ad3c1885ddf989aee@news-server>
anttoni Huhtala writes ..
>Dose eanyone know about the unicode on perl???
depends on the platform .. perl on NT doesn't have full unicode support
.. but the good news is that it's one of the targets pegged for the
latest three year OpenSource agreement between ActiveState and Microsoft
(been waiting to impart that knowledge)
--
jason - remove all hyphens for email reply -
------------------------------
Date: 5 Jul 1999 15:56:30 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Perl Unicode?
Message-Id: <slrn7o26v9.h6v.abigail@alexandra.delanet.com>
anttoni Huhtala (Anttoni@iname.com) wrote on MMCXXXIV September MCMXCIII
in <URL:news:3780A8DB.42E81D80@iname.com>:
<>
<> Dose eanyone know about the unicode on perl???
There's no Unicode support in the current release of Perl.
There is Unicode support in the next release of Perl.
Grab a development copy if you want to play with it.
Abigail
--
perl -wle 'print "Prime" if (0 x shift) !~ m 0^\0?$|^(\0\0+?)\1+$0'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Mon, 05 Jul 1999 05:38:31 GMT
From: whos_john_galt@my-deja.com
Subject: Perl Usuage
Message-Id: <7lpgcn$bd3$1@nnrp1.deja.com>
Thanks in advance.
I've been studying Perl for just a few months and am able to write
scripts that sufficiently perform all the tasks involved in running an
internet classifieds business, successfully.
I have enjoyed the evolution of rewriting script, because of something
new that I've learned...This may be an archaic approach, but...
The question I have is:
I use Perl for CGI, my business even uses an accounts
receivable/billing utility that I wrote in Perl to keep track of who
pays, etc. It is really efficient and effective, generating late
notices and the works, but I have to use it "through" the internet on a
virtual server, because my understanding stops there.
I use a PC with Windows 98, could I make applications such as this to
operate in a PC environment?
If not, where else is Perl used if not CGI? On servers?
Joey
(I'll accept the bashing, if the accompanying answers are worth it)
-The Race is to the Driven, not the Swift.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 5 Jul 1999 16:14:48 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: Perl Usuage
Message-Id: <MPG.11eaf86335634b0d989ae5@news-server>
whos_john_galt@my-deja.com writes ..
>I use a PC with Windows 98, could I make applications such as this to
>operate in a PC environment?
yes .. perl is available for most platforms - including Win32 .. there is
some loss of functionality due to porting issues - but in most cases
there are simple (and well documented) work arounds .. and for the
majority of straight forward scripts - these pose no problems
ActiveState have the most commonly used (and IMHO the best) perl
distribution for Win32 available on their website (they call it
ActivePerl)
www.activestate.com
>If not, where else is Perl used if not CGI? On servers?
everywhere:
- servers
- workstations
- CGI
- PCs
- Macs
- <insert computing entity here>
--
jason - remove all hyphens for email reply -
------------------------------
Date: Mon, 05 Jul 1999 09:57:08 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Perl Usuage
Message-Id: <37858012.7366870@news.skynet.be>
whos_john_galt@my-deja.com wrote:
>I use a PC with Windows 98, could I make applications such as this to
>operate in a PC environment?
It may be a platform limitation. On Unix, it's pretty straightforward to
write a "daemon" in Perl, which keeps running in the background, and to
which you can send requests by the "normal" network mechanisms
(sockets). HTTP etc. ("Internet") are just one example of these.
Can you use sockets on Win98? I guess not. I haven't used it, anyway.
>If not, where else is Perl used if not CGI? On servers?
Depends on what you want to do with it. Perl is useful for CGI because
it's such a great text munging tool, and not the other way around. I use
Perl extensively to create "reports", in any shape I like (as long as
it's text), from database data. No CGI in sight.
Bart.
------------------------------
Date: 5 Jul 1999 13:27:29 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Perl Usuage
Message-Id: <slrn7o1cqc.tac.fl_aggie@thepentagon.com>
On Mon, 05 Jul 1999 05:38:31 GMT, whos_john_galt@my-deja.com
<whos_john_galt@my-deja.com>, in <7lpgcn$bd3$1@nnrp1.deja.com> wrote:
+ where else is Perl used if not CGI?
Everywhere...
James
------------------------------
Date: Mon, 5 Jul 1999 14:03:56 GMT
From: jtbell@presby.edu (Jon Bell)
Subject: Re: Perl Usuage
Message-Id: <FEEHqK.K9@presby.edu>
<whos_john_galt@my-deja.com> wrote:
>
>I use a PC with Windows 98, could I make applications such as this to
>operate in a PC environment?
It may surprise you to learn this, but Perl was invented *before* anybody
had heard of the Web and CGI. :-) Therefore it is quite possible to
write and run "standalone" non-CGI scripts. You simply need to install
Perl on your PC (and on any other machine that you want to run the scripts
on).
>If not, where else is Perl used if not CGI? On servers?
I've been using Perl since about 1994-5 or thereabouts, on a Unix server,
to help me with system administration tasks: automate various tasks,
generate reports from log files, etc. Currently, my big Perl project is a
set of scripts that mostly automate the moderation process for a moderated
newsgroup. I've never written a single CGI script.
--
Jon Bell <jtbell@presby.edu> Presbyterian College
Dept. of Physics and Computer Science Clinton, South Carolina USA
[ Information about newsgroups for beginners: ]
[ http://www.geocities.com/ResearchTriangle/Lab/6882/ ]
------------------------------
Date: Tue, 06 Jul 1999 00:54:31 GMT
From: whos_john_galt@my-deja.com
Subject: Re: Perl Usuage
Message-Id: <7lrk43$7v$1@nnrp1.deja.com>
lol
-the more you learn, the more you find what you don't know.
there is something to say about proletiarianism.
*THANKS*
Joey
-The Race is to the Driven, not the Swift.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Sun, 04 Jul 1999 15:28:16 GMT
From: len.weaver@meritsoft.net (Len Weaver)
Subject: PerlBuilder
Message-Id: <377f7d9a.45912270@news1.sympatico.ca>
Hello,
I'm considering purchasing PerlBuilder from SolutionSoft. If
anyone has anything good or bad to say about PerlBuilder I'd like to
hear about.....I intend on doing most Perl developement on Win98, but
most of the scripts themselves will be running under UNIX.
Thanks in advance,
Len
---
Len Weaver
Meritsoft Corporation
len.weaver@meritsoft.net
------------------------------
Date: Mon, 5 Jul 1999 20:13:28 +0100
From: "Paul Wood" <john.wood@diamond.co.uk>
Subject: Re: PerlBuilder
Message-Id: <7lqvu7$49k$1@nclient3-gui.server.ntli.net>
Frankly, I think you'e better off with TextPad32 (http://www.textpad.com) or
EditPlus (http://www.editplus.com) for Win9X. They're quick, easy to use and
you can set up any programs you need (such as perl, pod2text... etc..) and
have them capture the output. I prefer the latter, but I used textpad for a
year quite happily before I found that.
-Paul.
Len Weaver <len.weaver@meritsoft.net> wrote in message
news:377f7d9a.45912270@news1.sympatico.ca...
> Hello,
>
> I'm considering purchasing PerlBuilder from SolutionSoft. If
> anyone has anything good or bad to say about PerlBuilder I'd like to
> hear about.....I intend on doing most Perl developement on Win98, but
> most of the scripts themselves will be running under UNIX.
>
> Thanks in advance,
> Len
> ---
> Len Weaver
> Meritsoft Corporation
> len.weaver@meritsoft.net
------------------------------
Date: Tue, 06 Jul 1999 17:59:14 GMT
From: bigcheese@my-deja.com
Subject: Re: PerlBuilder
Message-Id: <7ltg5a$kme$1@nnrp1.deja.com>
In article <7lqvu7$49k$1@nclient3-gui.server.ntli.net>,
"Paul Wood" <john.wood@diamond.co.uk> wrote:
> Frankly, I think you'e better off with TextPad32
(http://www.textpad.com) or
> EditPlus (http://www.editplus.com) for Win9X. They're quick, easy to
use and
> you can set up any programs you need (such as perl, pod2text... etc..)
and
> have them capture the output.
<snip>
I agree. I usually use TextPad to write my scripts and then a shareware
program called "WinPerl" to debug them. You can try an evaluation
version at:
http://www.techdroid.net/palware/software.html
Be aware though, it has many bugs (like when you copy and paste it
pastes 2 of what you copied), but it works. ^_^
At least try it before you buy PerlBuilder!
-Dan
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Sat, 3 Jul 1999 16:27:11 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: perlcc
Message-Id: <7llvcf$9hc2@news.cyber.net.pk>
Where to get it?
It is peculiar that perlcc didn't return any matches on perl.com !
I had perlcc before I crashed my linux ;o)
perldoc perlcc
man perlcc
no matches :(
--
Faisal Nasim (the Whiz Kid)
Web: http://wss.hypermart.net/
AOL: Whiz Swift ICQ: 4265451
FAX: (815) 846-2877
------------------------------
Date: Sat, 3 Jul 1999 23:01:09 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: Re: perlcc
Message-Id: <7lmmet$ai55@news.cyber.net.pk>
I remember now. RH52 came with Perl 5.005_2 and I installed
Perl 5.005_3 from the tar.gz package, thats why I had perlcc.
And now I crashed my linux (was playing with fdisk!) and installed
RH60, which had Perl 5.005_3 in RPM.
Should this be put in some faq or something that RH60 distributed
perl rpm doesn't have perlcc?
--
Faisal Nasim (the Whiz Kid)
Web: http://wss.hypermart.net/
AOL: Whiz Swift ICQ: 4265451
FAX: (815) 846-2877
------------------------------
Date: Mon, 05 Jul 1999 21:55:15 GMT
From: "Mike C" <orkid@iname.com>
Subject: PerlMagick and writing to STDOUT
Message-Id: <7R9g3.21571$ga.34929@news21.bellglobal.com>
Just a question to all the wise men and women out there =8)
Is there a way to get an image using perl to output to a browser? I have
devised a nasty listtle script is trying to do this but I cannot get it to
work. I output using $image->Write('gif:-'); ie. to standard output, but
this only spits out GIF data when i run it in the shell. when i call the
script from the web browser I get nothing, ie. a Server Hangup (ie ie4) and
a Connection Closed before transaction completed (when in Netscape 4.6),
which is odd IMO.
I am new to perl, and any help would be great! One person I talked to
said it might be an Apache configuration thing. Could this be the case? If
so, what might have to be done to remedy this problem?
Currently my httpd.conf tells apache this on pl files:
<Files ~ "\.pl$">
SetHandler perl-script
PerlHandler Apache::Registry
Options +ExecCGI
</Files>
and my perl script that i am calling is:
#!/usr/local/bin/perl
use Image::Magick;
my($image);
$image = Image::Magick->new;
$image->Set(size=>'100x100');
$image->ReadImage('xc:white');
$image->Set('pixel[49, 49]'=>'red');
#print "Content-type: image/gif\n\n";
$image->Write('gif:-');
undef $image;
I've tried it WITH and w/o the Content-type line. WITH the line it only
gives me the content type line, w/o the line it doesn't do anything (in the
browser), in the shell WITH the content-type line it gives me the
content-type line and the gif file (written out right on my screen) and w/o
the content-type line it just gives me the gif file on the screen.
any help would be greatly appreciated =8)
-mikec
------------------------------
Date: 5 Jul 1999 18:52:21 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: PerlMagick and writing to STDOUT
Message-Id: <slrn7o2h90.h6v.abigail@alexandra.delanet.com>
Mike C (orkid@iname.com) wrote on MMCXXXIV September MCMXCIII in
<URL:news:7R9g3.21571$ga.34929@news21.bellglobal.com>:
;;
;; Is there a way to get an image using perl to output to a browser?
I've never heard of images using Perl. How do they do that?
;; I have
;; devised a nasty listtle script is trying to do this but I cannot get it to
;; work. I output using $image->Write('gif:-'); ie. to standard output, but
;; this only spits out GIF data when i run it in the shell. when i call the
;; script from the web browser I get nothing, ie. a Server Hangup (ie ie4) and
;; a Connection Closed before transaction completed (when in Netscape 4.6),
;; which is odd IMO.
You might want to use a web server as intermediar. That probably works
better than having the browser call the script directly. Specially if
you want to go beyond your local drive and have it out there on the Web.
;; I am new to perl, and any help would be great! One person I talked to
;; said it might be an Apache configuration thing. Could this be the case? If
;; so, what might have to be done to remedy this problem?
Well, to find out answers to both of your questions, call Apache Tech
Support. This group is about Perl, and I haven't seen a Perl question
from you so far.
;; I've tried it WITH and w/o the Content-type line. WITH the line it only
;; gives me the content type line, w/o the line it doesn't do anything (in the
;; browser), in the shell WITH the content-type line it gives me the
;; content-type line and the gif file (written out right on my screen) and w/o
;; the content-type line it just gives me the gif file on the screen.
Looks like you program runs just fine then. The interaction between the
web server and your program might be a problem, but that isn't discussed
here. The problem might also be the web server itself. Again, that's beyond
this group. Perhaps it's the interaction between the browser and the web
server. Not for this group either. It could be the browser. And again, that's
not to be discussed in this group.
This group deals with Perl problems. You haven't shown us a Perl problem.
Abigail
--
perl -MNet::Dict -we '(Net::Dict -> new (server => "dict.org")
-> define ("foldoc", "perl")) [0] -> print'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Tue, 06 Jul 1999 14:18:53 GMT
From: "Mike C" <orkid@iname.com>
Subject: Re: PerlMagick and writing to STDOUT
Message-Id: <hfog3.21985$ga.35231@news21.bellglobal.com>
>This group deals with Perl problems. You haven't shown us a Perl problem.
wasn't sure if it was a Perl problem or an Apache problem, now that I'm
fairly sure its an Apache problem, I'll go to that newsgroup. I was thinking
it might've been something to do with STDOUT.
ok, thanks,
-mikec
------------------------------
Date: Sat, 03 Jul 1999 15:35:26 GMT
From: pkolis@lvwebmasters.com
Subject: PerlScript - Passing Parms to a Stored Procedure
Message-Id: <7llaju$8g4$1@nnrp1.deja.com>
Hi,
I've tried unsuccessfully to pass a parm from PerlScript to a stored
procedure in an Access97 database. I've tried different approaches
based on the information I could find on this subject, but
none work. I've included the PerlSript code, stored procedure, and
error message. I'd appreciate any feedback. Thank You. Pat Kolis
Script:
<%@ LANGUAGE = PerlScript %>
<%
$Conn = $Server->CreateObject("ADODB.Connection");
$Conn->Open("nirvana1");
$code = "10942";
$RS = $Conn->Execute("SelectProduct3",$code,4);
while (!$RS->EOF) {
$Response->write($RS->Fields('UPCCode')->Item);
$Response->write($RS->Fields('Package')->Item);
$RS->MoveNext();
}
%>
Procedure:
PARAMETERS [code] Text;
SELECT *
FROM ProductSpecifications
WHERE UPCCode = [code];
Error Message:
$RS = $Conn->Execute("SelectProduct3",$code,4); while (!$RS->EOF) {
error '80004005'
Can't call method "EOF" on an undefined value.
/asptest/testparms.asp, line 11
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Sun, 04 Jul 1999 13:31:34 GMT
From: tony@webscripts.org (Tony Greenwood)
Subject: PGP and Mail
Message-Id: <377f61a2.12894045@news.freeserve.co.uk>
The following script works to the point that it sends me an email..
but the body is blank, the subject and from are filled in.. just no
message..
The $ret_val fetches a number usualy 4 or 5 figure, so PGP path must
be correct and installed OK
I don't get any "can't open" messages that I placed and no server
errors. If I place a HTML routine at the bottom of this script that
displays OK.. Also the script makes the temp file OK so writing to
server is correct.. in fact everything seems correct...
Thus we know it goes through the script without errors, PGP is
installed and interacted with using $ret_val and Mail is set right
because I get a blank email
Can anyone please give me an idea why the email is blank?
#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
$pgpprog = '/usr/local/bin/pgp';
$ENV{PGPPATH}='/home/tony/.pgp';
$mailprog = '/usr/sbin/sendmail';
$whoto="pgp\@webscripts.org";
$whofrom="testin pgp";
# Open The Mail Program
open(MAIL,"|$mailprog -t");
print MAIL "To: $whoto\n";
print MAIL "From: $whofrom\n";
print MAIL "Subject: pgp test\n";
# now open PGP
$pgptmp = 'pgptmp';
$pgptmp .= getppid();
$pgptmp .= '.asc';
$ret_val = open (PGP, "|$pgpprog -fea +VERBOSE=0 \"tony
<tony\@tony.co.uk>\" > $pgptmp");
if($ret_val < 1)
{
print "Can't open1 $pgpprog!\n";
}
print PGP "testing line 1 of 5\n";
print PGP "testing line 2 of 5\n";
print PGP "testing line 3 of 5\n";
print PGP "testing line 4 of 5\n";
print PGP "testing line 5 of 5\n";
close (PGP);
open(PGPFILE, $pgptmp) || print "Can't open2 $pgptmp!";
while(<PGPFILE>)
{
print MAIL;
}
close (PGPFILE);
unlink("$pgptmp");
close (MAIL);
------------------------------
Date: Sun, 04 Jul 1999 16:40:41 -0400
From: brian@pm.org (brian d foy)
Subject: Re: PGP and Mail
Message-Id: <brian-ya02408000R0407991640410001@news.panix.com>
In article <377f61a2.12894045@news.freeserve.co.uk>, tony@webscripts.org posted:
> $ret_val = open (PGP, "|$pgpprog -fea +VERBOSE=0 \"tony
> <tony\@tony.co.uk>\" > $pgptmp");
i recommend using IPC::Open3. i recently posted an example in either
this forum or comp.infosystems.www.authoring.cgi.
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
Perl Monger Hats! <URL:http://www.pm.org/clothing.shtml>
------------------------------
Date: Mon, 05 Jul 1999 00:38:27 GMT
From: tony@webscripts.org (Tony Greenwood)
Subject: Re: PGP and Mail
Message-Id: <3791fde6.52903715@news.freeserve.co.uk>
Hey! brian@pm.org (brian d foy)
>In article <377f61a2.12894045@news.freeserve.co.uk>, tony@webscripts.org posted:
>
>> $ret_val = open (PGP, "|$pgpprog -fea +VERBOSE=0 \"tony
>> <tony\@tony.co.uk>\" > $pgptmp");
>
>i recommend using IPC::Open3. i recently posted an example in either
"IPC::Open3" means little to me I am afraid.
>this forum or comp.infosystems.www.authoring.cgi.
I downloaded the last 500 messages for this newsgroup and thats all I
could get. I am afraid "comp.infosystems.www.authoring.cgi" seems to
be broken for the last few days. Just null.
I will do a global search of deja for your maessage.. thanks :)
------------------------------
Date: Mon, 05 Jul 1999 13:09:24 -0400
From: Bob Walton <walton@frontiernet.net>
To: tony@webscripts.org
Subject: Re: PGP and Mail
Message-Id: <3780E6C4.555DD6CE@frontiernet.net>
Tony Greenwood wrote:
> The following script works to the point that it sends me an email..
> but the body is blank, the subject and from are filled in.. just no
> message..
> ...
Tony, I'm not sure, but I think sendmail needs a blank line after the
header lines. Try adding an extra \n to your line:
print MAIL "Subject: pgp test\n";
and see if that helps.
------------------------------
Date: Mon, 05 Jul 1999 17:25:07 GMT
From: tony@webscripts.org (Tony Greenwood)
Subject: Re: PGP and Mail
Message-Id: <378be97a.30430263@news.freeserve.co.uk>
Hey! Bob Walton <walton@frontiernet.net>
>Tony Greenwood wrote:
>
>> The following script works to the point that it sends me an email..
>> but the body is blank, the subject and from are filled in.. just no
>> message..
>> ...
>
>Tony, I'm not sure, but I think sendmail needs a blank line after the
Yeagh thanks I should have done that anyway.. But it still didnt work.
I found an excellent script from simple.. simplesecure.cgi, its not
what I want and wont be using because I wish to make my own.. however
it's an excellent script and has some great error checking and returns
a nice list of paths and problems.. so I passed that back to the
server people and left it with them. I am convinced the script is
right (dangerous I know<g>) and that they have something wrong.
Thanx for the input.. we will see <smile>
--
Tony Greenwood
PORTFOLIO www.webscripts.org
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V9 Issue 42
************************************
