[13664] in Perl-Users-Digest
Perl-Users Digest, Issue: 1074 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 15 15:37:28 1999
Date: Fri, 15 Oct 1999 12:37:15 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <940016234-v9-i1074@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Fri, 15 Oct 1999 Volume: 9 Number: 1074
Today's topics:
Pipe errors on close() (Bill Moseley)
Re: Pipe errors on close() <ltl@rgsun5.viasystems.com>
Re: Pipe errors on close() (Bill Moseley)
Please , help me. <jordi@sakma.com>
Re: Please , help me. (Clinton Pierce)
Re: Please , help me. (Tad McClellan)
Please Help a newbie !!! <dht@vnvn.net>
Re: Please Help a newbie !!! <sjohns17@uic.edu>
Re: Please Help: install module on Red Hat bsrinivas@my-deja.com
Polls and Surveys not server sides <simon@arial.freeserve.co.uk>
Re: Polls and Surveys not server sides <amonotod@netscape.net>
Re: Polls and Surveys not server sides <simon@arial.freeserve.co.uk>
Re: Polls and Surveys not server sides <rootbeer@redcat.com>
Re: Polls and Surveys not server sides <rootbeer@redcat.com>
Re: Polls and Surveys not server sides <simon@arial.freeserve.co.uk>
Re: Polls and Surveys not server sides <amonotod@netscape.net>
Re: Polls and Surveys not server sides <pdobbs@home.com>
Re: Polls and Surveys not server sides (Malcolm Ray)
Porting Perl.... <john.warner@tivoli.com>
Re: Porting Perl.... <laurensmith@sprynet.com>
PostgreSQL help <jsmith@vocollect.com>
Re: PostgreSQL help (Brett W. McCoy)
Re: Printing from an HTML button? <makkulka@cisco.com>
Re: Printing from an HTML button? (Abigail)
Problem adding module for SCO Unixware 2.13 <vin@one.net.au>
Problem with pack <spafm@gmx.net>
Re: Problem with pack <jtribbeck@argogroup.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 12 Oct 1999 23:17:24 -0700
From: moseley@best.com (Bill Moseley)
Subject: Pipe errors on close()
Message-Id: <MPG.126dc3d3f517b8cc9897fb@nntp1.ba.best.com>
I'm doing a pipe open to a program. The program seems to run fine and
to completion (it's indexing a database). But the close() is failing
and $? is returning the number 13.
Any ideas?
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: 13 Oct 1999 15:43:00 GMT
From: lt lindley <ltl@rgsun5.viasystems.com>
Subject: Re: Pipe errors on close()
Message-Id: <7u29a4$12a$2@rguxd.viasystems.com>
Bill Moseley <moseley@best.com> wrote:
:>I'm doing a pipe open to a program. The program seems to run fine and
:>to completion (it's indexing a database). But the close() is failing
:>and $? is returning the number 13.
If you run the same program from the shell does it set the
same exit code? It may just be poor behavior (or poorly
documented perverse behavior) on the part of the application.
Many applications fail (for some definition of fail) and do not
set an appropriate exit status. Some others succeed (for some
definition of success) and do not set an appropriate exit status
either. It may be doing what you asked it to do and then failing
when it tries to clean up after itself or failing to create a
log file in the current directory.
Kind of hard to tell without "good" documentation or access to the
source code. But you already knew that. :-)
--
// Lee.Lindley /// I used to think that being right was everything.
// @bigfoot.com /// Then I matured into the realization that getting
//////////////////// along was more important. Except on usenet.
------------------------------
Date: Wed, 13 Oct 1999 13:43:57 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: Pipe errors on close()
Message-Id: <MPG.126e8eedc9bfb6509897ff@nntp1.ba.best.com>
lt lindley (ltl@rgsun5.viasystems.com) seems to say...
> Bill Moseley <moseley@best.com> wrote:
> :>I'm doing a pipe open to a program. The program seems to run fine and
> :>to completion (it's indexing a database). But the close() is failing
> :>and $? is returning the number 13.
Silly me. I close'd before the program was done.
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: Thu, 14 Oct 1999 17:28:30 +0200
From: "Jordi Pereta" <jordi@sakma.com>
Subject: Please , help me.
Message-Id: <7u4som$akm$1@diana.bcn.ttd.net>
My problem is:
The open the ("dbmopen(%DB, "sku", 0644); ") , the type SDBM
if add in the record a value > 1024 equal -> Error ("sdbm store
returned -1, errno 2, key ...")
Thanks for your help.
------------------------------
Date: Thu, 14 Oct 1999 18:19:50 GMT
From: cpierce1@ford.com (Clinton Pierce)
Subject: Re: Please , help me.
Message-Id: <38081e3e.783301688@news.ford.com>
[poster cc'd in e-mail]
On Thu, 14 Oct 1999 17:28:30 +0200, "Jordi Pereta" <jordi@sakma.com>
wrote:
>My problem is:
>
> The open the ("dbmopen(%DB, "sku", 0644); ") , the type SDBM
>
> if add in the record a value > 1024 equal -> Error ("sdbm store
>returned -1, errno 2, key ...")
The built-in databases accessed with dbmopen() have a limit on the length
of the key and data that can be stored in any one record. This is a
limitation of the DBM library implementation for your system, and not
Perl's fault. You can specify larger keys for the library when you
compile it.
HTH
PS: Pick a better subject line next time.
--
Clinton A. Pierce "If you rush a Miracle Man, you get rotten
clintp@geeksalad.org Miracles." -- Miracle Max, The Princess Bride
http://www.geeksalad.org
------------------------------
Date: Thu, 14 Oct 1999 10:52:38 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Please , help me.
Message-Id: <mnq4u7.bs3.ln@magna.metronet.com>
Jordi Pereta (jordi@sakma.com) wrote:
: Subject: Please , help me.
Please , subject in your Subject:
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 15 Oct 1999 01:49:12 -0700
From: "DHT" <dht@vnvn.net>
Subject: Please Help a newbie !!!
Message-Id: <7u6pga$ciq$1@autumn.news.rcn.net>
Which codes at the end program (or a sub) so that program won't run when
people click on Go Back button of browsers ?
I already try "exit" at the end of each sub but it didn't work !
Help please !!!
Thank you for any suggestions
------------------------------
Date: Fri, 15 Oct 1999 04:07:13 -0500
From: Seth David Johnson <sjohns17@uic.edu>
Subject: Re: Please Help a newbie !!!
Message-Id: <Pine.A41.4.10.9910150357090.248718-100000@tigger.cc.uic.edu>
On Fri, 15 Oct 1999, DHT wrote:
> Which codes at the end program (or a sub) so that program won't run when
> people click on Go Back button of browsers ?
>
> I already try "exit" at the end of each sub but it didn't work !
> Help please !!!
I really don't know what to say to this...
If the script's URL isn't cached (and that depends on the user's browser
settings), your script is going to be called when the person returns to
it.
You're not asking how to *end* the program (oh man, I am trying to contain
myself here), but how *not* to start it again. Well, right now I am really
sleepy and only half-lucid, but the only thing that pops immediately into
mind is something involving exiting the script early based on IP (and
time)... which, of course, is silly. This *really* wasn't a Perl question
though; it was an "I need to learn how HTTP/CGI works" declaration.
I really hate to be harsh, but... ah, hell, I need to get some sleep.
-Seth
------------------------------
Date: Tue, 12 Oct 1999 22:47:58 GMT
From: bsrinivas@my-deja.com
Subject: Re: Please Help: install module on Red Hat
Message-Id: <7u0dqq$hp0$1@nnrp1.deja.com>
In article <49d7v0pdyg.fsf@playpen.baileylink.net>,
mah@everybody.org (Mark A. Hershberger) wrote:
> The CPAN module is good if you run it as root for installations.
I use CPAN regularly, though I am just a beginner. Yesterday I had
upgraded couple of modules using CPAN after CPAN told me that I have
older version on my machine. Now I can not bring up the CPAN any more.
% perl -MCPAN -e shell
IO object version 1.20 does not match $IO:: 1.15 at /usr/lib/perl5/mips-
linux/5.00404/DynaLoader.pm line 185.
BEGIN failed--compilation aborted at /usr/lib/perl5/mips-
linux/5.00404/IO/Seekable.pm line 50.
BEGIN failed--compilation aborted at /usr/lib/perl5/mips-
linux/5.00404/IO/File.pm line 111.
BEGIN failed--compilation aborted at /usr/lib/perl5/CPAN.pm line 27.
BEGIN failed--compilation aborted.
I had posted another question to know how to uninstall 1.20 (cleanly)
and install 1.15. I got the answer for my first part of the question
from your reply (just do rm -fr). But I could not find 1.15 of IO
anywhere. Now I can not bring up CPAN.
What I am thinking is just remove IO-1.20 and install IO-1.15 to get
CPAN running and then install the latest Dynaloader which may decide to
install the correct IO module.
Am I right? Is this correct way to get going. Or is there any simpler
way to do this. How can I check in CPAN to make sure I will not make
the same mistake again? Thanks for any help.
-Srinivas
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 13 Oct 1999 07:27:13 +0100
From: "simon" <simon@arial.freeserve.co.uk>
Subject: Polls and Surveys not server sides
Message-Id: <7u2j9l$f2h$1@news4.svr.pol.co.uk>
Does anyboyd know of a perl or c++ script that will allow me to take a poll
/ vote on my site, that DOESNT require me to chnage my page to a SSI, I have
thousands of links to index.html I don't want to change the damm name
Cheers
Simon Harrison
------------------------------
Date: Wed, 13 Oct 1999 21:02:03 GMT
From: amonotod <amonotod@netscape.net>
Subject: Re: Polls and Surveys not server sides
Message-Id: <7u2s02$av9$1@nnrp1.deja.com>
"simon" <simon@arial.freeserve.co.uk> wrote:
> Does anyboyd know of a perl or c++ script that will allow me to take a
poll
> / vote on my site, that DOESNT require me to chnage my page to a SSI,
I have
> thousands of links to index.html I don't want to change the damm name
What does using SSI have to do with changing the name of your file?
If you did implement the SSI, you would change only code in the page you
want the poll/form to be included in; like this:
<blah>
BLAH BLAH BLAH
</blah>
<!--#exec cgi="../../cgi-bin/my_poll_form.cgi -->
<more_blah>
Blah Blah Blah
</more_blah>
And that would be it. It wouldn't change the name of your index.html at
all, and all references to it would still work just fine. Take a look
at this...
http://hoohoo.ncsa.uiuc.edu/docs/tutorials/includes.html
HTH,
amonotod
--
`\|||/ amonotod@
(@@) netscape.net
ooO_(_)_Ooo________________________________
_____|_____|_____|_____|_____|_____|_____|_____|
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 13 Oct 1999 10:13:05 +0100
From: "simon" <simon@arial.freeserve.co.uk>
Subject: Re: Polls and Surveys not server sides
Message-Id: <7u2t0q$nca$1@news4.svr.pol.co.uk>
Thanks it late here, I will take a look
In regards changing extensions, whenever a SSI has been involved typically
it has requested me to change the file extension to .shtml from html,
Is this not the case ?
Regards
Simon Harrison
amonotod <amonotod@netscape.net> wrote in message
news:7u2s02$av9$1@nnrp1.deja.com...
> "simon" <simon@arial.freeserve.co.uk> wrote:
> > Does anyboyd know of a perl or c++ script that will allow me to take a
> poll
> > / vote on my site, that DOESNT require me to chnage my page to a SSI,
> I have
> > thousands of links to index.html I don't want to change the damm name
>
> What does using SSI have to do with changing the name of your file?
> If you did implement the SSI, you would change only code in the page you
> want the poll/form to be included in; like this:
>
> <blah>
> BLAH BLAH BLAH
> </blah>
> <!--#exec cgi="../../cgi-bin/my_poll_form.cgi -->
> <more_blah>
> Blah Blah Blah
> </more_blah>
>
> And that would be it. It wouldn't change the name of your index.html at
> all, and all references to it would still work just fine. Take a look
> at this...
> http://hoohoo.ncsa.uiuc.edu/docs/tutorials/includes.html
>
> HTH,
> amonotod
>
> --
> `\|||/ amonotod@
> (@@) netscape.net
> ooO_(_)_Ooo________________________________
> _____|_____|_____|_____|_____|_____|_____|_____|
>
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
------------------------------
Date: Wed, 13 Oct 1999 14:26:16 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Polls and Surveys not server sides
Message-Id: <Pine.GSO.4.10.9910131425510.25558-100000@user2.teleport.com>
On Wed, 13 Oct 1999, simon wrote:
> Does anyboyd know of a perl or c++ script that will allow me to take a
> poll / vote on my site, that DOESNT require me to chnage my page to a
> SSI,
If you're wishing merely to _find_ (as opposed to write) programs,
this newsgroup may not be the best resource for you. There are many
freeware and shareware archives which you can find by searching Yahoo
or a similar service. Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 13 Oct 1999 15:11:47 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Polls and Surveys not server sides
Message-Id: <Pine.GSO.4.10.9910131509490.25558-100000@user2.teleport.com>
On Wed, 13 Oct 1999, simon wrote:
> In regards changing extensions, whenever a SSI has been involved typically
> it has requested me to change the file extension to .shtml from html,
>
> Is this not the case ?
In sounds as if you're trying to find out something about your webserver
and how it behaves. Perhaps you should ask your local expert or webmaster.
After all, even if we knew which webserver you use and how it's
configured, which we don't know, we're here to talk about Perl, not
webservers. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 13 Oct 1999 21:29:27 +0100
From: "simon" <simon@arial.freeserve.co.uk>
Subject: Re: Polls and Surveys not server sides
Message-Id: <7u44l4$ac7$1@news5.svr.pol.co.uk>
OK, sorry to bother you I just thought Perl guys may know if any such Perl
scritps existed
Thanks
SImon
Tom Phoenix <rootbeer@redcat.com> wrote in message
news:Pine.GSO.4.10.9910131425510.25558-100000@user2.teleport.com...
> On Wed, 13 Oct 1999, simon wrote:
>
> > Does anyboyd know of a perl or c++ script that will allow me to take a
> > poll / vote on my site, that DOESNT require me to chnage my page to a
> > SSI,
>
> If you're wishing merely to _find_ (as opposed to write) programs,
> this newsgroup may not be the best resource for you. There are many
> freeware and shareware archives which you can find by searching Yahoo
> or a similar service. Hope this helps!
>
> --
> Tom Phoenix Perl Training and Hacking Esperanto
> Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
>
------------------------------
Date: Thu, 14 Oct 1999 13:00:16 GMT
From: amonotod <amonotod@netscape.net>
Subject: Re: Polls and Surveys not server sides
Message-Id: <7u4k4o$hjr$1@nnrp1.deja.com>
Tom Phoenix <rootbeer@redcat.com> wrote:
> On Wed, 13 Oct 1999, simon wrote:
>
> > In regards changing extensions, whenever a SSI has been involved
> > typically
> > it has requested me to change the file extension to .shtml from
> > html,
> >
> > Is this not the case ?
No, this is not the case... It is all about how the webserver is
configured, can be for .shtml, or .html, or just about any file type, it
is up to the admin to configure. And anyway, even if you did do .shtml,
you could just set up a new index.html that bumps the browsers to
index.shtml. Fairly simple, whichever way you go.
> In sounds as if you're trying to find out something about your
> webserver
> and how it behaves. Perhaps you should ask your local expert or
> webmaster.
> After all, even if we knew which webserver you use and how it's
> configured, which we don't know, we're here to talk about Perl, not
> webservers. Cheers!
Tom's reply is inarguable, although I did choose to answer you. Next
time you should go to
comp.infosystems.www.choose_the_appropriate_branch, you'll probably find
more willing help there...
Also, your reply style is lacking in proper structure, check out this:
http://www.geocities.com/amonotod/non_jep_reply.html.
HTH,
amonotod
--
`\|||/ amonotod@
(@@) netscape.net
ooO_(_)_Ooo________________________________
_____|_____|_____|_____|_____|_____|_____|_____|
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Fri, 15 Oct 1999 15:38:13 GMT
From: Paul D <pdobbs@home.com>
Subject: Re: Polls and Surveys not server sides
Message-Id: <38074B8A.DB0C2B5D@home.com>
Are you sure about that not needing to be renamed to .ssi ??
I was just working on that last night. I use Netscape 4.5 and
unless the page itself is named with a .ssi it doesn't actually
use the #exec function at all.
As soon as I renamed to a .ssi extension it worked perfect.
I'll check out your link provided.. but that was my initial
experience.
amonotod wrote:
>
> "simon" <simon@arial.freeserve.co.uk> wrote:
> > Does anyboyd know of a perl or c++ script that will allow me to take a
> poll
> > / vote on my site, that DOESNT require me to chnage my page to a SSI,
> I have
> > thousands of links to index.html I don't want to change the damm name
>
> What does using SSI have to do with changing the name of your file?
> If you did implement the SSI, you would change only code in the page you
> want the poll/form to be included in; like this:
>
> <blah>
> BLAH BLAH BLAH
> </blah>
> <!--#exec cgi="../../cgi-bin/my_poll_form.cgi -->
> <more_blah>
> Blah Blah Blah
> </more_blah>
>
> And that would be it. It wouldn't change the name of your index.html at
> all, and all references to it would still work just fine. Take a look
> at this...
> http://hoohoo.ncsa.uiuc.edu/docs/tutorials/includes.html
>
> HTH,
> amonotod
>
> --
> `\|||/ amonotod@
> (@@) netscape.net
> ooO_(_)_Ooo________________________________
> _____|_____|_____|_____|_____|_____|_____|_____|
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
------------------------------
Date: 15 Oct 1999 15:52:01 GMT
From: M.Ray@ulcc.ac.uk (Malcolm Ray)
Subject: Re: Polls and Surveys not server sides
Message-Id: <slrn80ejd1.jkj.M.Ray@carlova.ulcc.ac.uk>
On Fri, 15 Oct 1999 15:38:13 GMT, Paul D <pdobbs@home.com> wrote:
>Are you sure about that not needing to be renamed to .ssi ??
>I was just working on that last night. I use Netscape 4.5 and
>unless the page itself is named with a .ssi it doesn't actually
>use the #exec function at all.
>As soon as I renamed to a .ssi extension it worked perfect.
>I'll check out your link provided.. but that was my initial
>experience.
That's entirely dependent on the configuration of the web server.
If you're unsure of how your web server is configured to recognise a
file as needing SSI parsing, ask your system administrator. If you
are the system administrator, consult the web server documentation
or ask in a group devoted to web server configuration, such as
comp.infosystems.www.servers.unix.
--
Malcolm Ray University of London Computer Centre
------------------------------
Date: Wed, 13 Oct 1999 09:47:48 -0500
From: John Warner <john.warner@tivoli.com>
Subject: Porting Perl....
Message-Id: <38049B93.533E69CE@tivoli.com>
Does anybody know if Perl has been ported to the AS/400 platform? I
didn't find it on CPAN. Has anyone ported Perl to the AS/400 on their
own?
--
John Warner Tivoli Systems Inc.
Sales Support Engineer 9442 Capital Of Texas Hwy North
Sales Infrastructure Group Austin, TX 78759
john_warner@tivoli.com
------------------------------
Date: Wed, 13 Oct 1999 12:09:52 -0700
From: "Lauren Smith" <laurensmith@sprynet.com>
Subject: Re: Porting Perl....
Message-Id: <7u2le7$uq8$1@brokaw.wa.com>
John Warner wrote in message <38049B93.533E69CE@tivoli.com>...
>Does anybody know if Perl has been ported to the AS/400 platform? I
>didn't find it on CPAN. Has anyone ported Perl to the AS/400 on their
>own?
perlfaq2:"What machines support Perl? Where do I get it?"
Lauren
------------------------------
Date: Thu, 14 Oct 1999 14:13:44 -0400
From: "John P. Smith" <jsmith@vocollect.com>
Subject: PostgreSQL help
Message-Id: <38061D58.42A3FA76@vocollect.com>
--------------83BC2BF8F65B27F9720182DA
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
I know that I'm not asking a perl question, but I've noticed a lot of
postgres users on this newsgroup and I don't think that there are any
postgres newsgroups and their mailing lists were of no help. I'm just
wondering if it is possible to create a function in postgres with local
variables. The create function that I'm trying to implement is as
follows:
CREATE FUNCTION newProblem(char(50), char(255){,...}) RETURNS int4
AS '
{somehow need to declare a couple of int4 variables}
int4 PROBoid, SPRoid; <--maybe like this?
PROBoid = INSERT INTO SPRProblem ({fields}) VALUES ($1,$2{,...});
SPRoid = INSERT INTO SPRrecord (problemid) SELECT id FROM SPRProblem
WHERE oid = PROBoid;
SELECT SPRnum FROM SPRrecord WHERE oid = SPRoid; <-- this will actually
make it return the SPR
' LANGUAGE 'sql';
Does anyone know how to do this? Thanks in advance.
Jack Smith
--------------83BC2BF8F65B27F9720182DA
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
I know that I'm not asking a perl question, but I've noticed a lot of postgres
users on this newsgroup and I don't think that there are any postgres newsgroups
and their mailing lists were of no help. I'm just wondering if it
is possible to create a function in postgres with local variables.
The <b>create function</b> that I'm trying to implement is as follows:
<p> CREATE FUNCTION newProblem(char(50), char(255){,...})
RETURNS int4
<br>AS '
<br> <font color="#993366">{somehow need to declare a couple of int4
variables}</font>
<br> int4 PROBoid, SPRoid; <font color="#993366"><--maybe like
this?</font>
<br> PROBoid = INSERT INTO SPRProblem ({fields}) VALUES ($1,$2{,...});
<br> SPRoid = INSERT INTO SPRrecord (problemid) SELECT id FROM SPRProblem
WHERE oid = PROBoid;
<br> SELECT SPRnum FROM SPRrecord WHERE oid = SPRoid; <-- this
will actually make it return the SPR
<br>' LANGUAGE 'sql';
<p>Does anyone know how to do this? Thanks in advance.
<p>Jack Smith</html>
--------------83BC2BF8F65B27F9720182DA--
------------------------------
Date: Thu, 14 Oct 1999 18:28:27 GMT
From: bmccoy@foiservices.com (Brett W. McCoy)
Subject: Re: PostgreSQL help
Message-Id: <slrn80c8ed.ng.bmccoy@moebius.foiservices.com>
Also Sprach John P. Smith <jsmith@vocollect.com>:
>
>--------------83BC2BF8F65B27F9720182DA
>Content-Type: text/plain; charset=us-ascii
>Content-Transfer-Encoding: 7bit
>
>I know that I'm not asking a perl question, but I've noticed a lot of
>postgres users on this newsgroup and I don't think that there are any
>postgres newsgroups and their mailing lists were of no help. I'm just
>wondering if it is possible to create a function in postgres with local
>variables. The create function that I'm trying to implement is as
>follows:
You should use the Postgres Procedural Language (pl/pgsql) that comes with
Postgres to do such things.
--
Brett W. McCoy bmccoy@foiservices.com
Computer Operations Manager (Alpha Geek) http://www.foiservices.com
FOI Services, Inc./DIOGENES 301-975-0110
---------------------------------------------------------------------------
------------------------------
Date: Tue, 12 Oct 1999 14:45:37 -0700
From: Makarand Kulkarni <makkulka@cisco.com>
Subject: Re: Printing from an HTML button?
Message-Id: <3803AC01.6DADCF65@cisco.com>
Olivier Maas wrote:
> I would like 2 know if it is possible to print a html page using an html
> button within the page.
This can be done with javascript using print()
<FORM>
<INPUT TYPE="BUTTON" VALUE="Print Page" onClick="window.print();">
</FORM>
This was not the right newsgroup to post to though.
--
------------------------------
Date: 12 Oct 1999 17:19:07 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Printing from an HTML button?
Message-Id: <slrn807cuc.gep.abigail@alexandra.delanet.com>
Olivier Maas (olivier.maas@at-lci.com) wrote on MMCCXXXIII September
MCMXCIII in <URL:news:380320A4.5B905E6D@at-lci.com>:
==
== I would like 2 know if it is possible to print a html page using an html
== button within the page.
<BUTTON value = "Please use the print function of your browser to print
this document!">
== I have several pages and I would like 2 have my own "print" button on
== the page (using jscript, VBscript, or perl... or anything else!!)
AFAIK, there isn't a browser that uses Perl as its scripting language.
But even so, it's still not a Perl question. It would be a browser
issue. It's certainly not an HTML issue, as such fluff doesn't belong
in HTML. Printing is a browser issue. Most, if not all, browser have a
printing function. Why you want your own "print" button is beyond me.
Or are you writing a browser in Perl?
Abigail
--
perl -MTime::JulianDay -lwe'@r=reverse(M=>(0)x99=>CM=>(0)x399=>D=>(0)x99=>CD=>(
0)x299=>C=>(0)x9=>XC=>(0)x39=>L=>(0)x9=>XL=>(0)x29=>X=>IX=>0=>0=>0=>V=>IV=>0=>0
=>I=>$r=-2449231+gm_julian_day+time);do{until($r<$#r){$_.=$r[$#r];$r-=$#r}for(;
!$r[--$#r];){}}while$r;$,="\x20";print+$_=>September=>MCMXCIII=>()'
-----------== 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: Fri, 15 Oct 1999 18:21:42 +1000
From: "Vin" <vin@one.net.au>
Subject: Problem adding module for SCO Unixware 2.13
Message-Id: <3806e360@pink.one.net.au>
Hi, I'm trying to install the NET::Daemon module on Perl 5.00503
I'm logged in as root
and when I do the 'make test'
I get the following:
{ivrdevl01}~/daemon/Net-Daemon-0.28 > make test
PERL_DL_NONLAZY=1
/bin/perl -Iblib/arch -Iblib/lib -I/usr/local/lib/perl5/5.00503/i386-svr4 -I
/usr/local/lib/perl5/5.00503 -e 'use Test::Harness qw(&runtests $verbose);
$verbose=0; runtests @ARGV;' t/*.t
t/base..............ok
t/config............Cannot open Syslog: Can't locate syslog.ph in @INC (did
you run h2ph?) (@INC contains: blib/arch blib/lib blib/lib blib/arch
blib/arch blib/lib /usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .) at
/usr/local/lib/perl5/5.00503/Sys/Syslog.pm line 117.
Server process didn't create a file 'ndtest.prt'. at
blib/lib/Net/Daemon/Test.pm line 317.
dubious
Test returned status 2 (wstat 512, 0x200)
DIED. FAILED tests 1-5
Failed 5/5 tests, 0.00% okay
t/fork..............Cannot open Syslog: Can't locate syslog.ph in @INC (did
you run h2ph?) (@INC contains: blib/arch blib/lib blib/lib blib/arch
blib/arch blib/lib /usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .) at
/usr/local/lib/perl5/5.00503/Sys/Syslog.pm line 117.
Server process didn't create a file 'ndtest.prt'. at
blib/lib/Net/Daemon/Test.pm line 317.
FAILED tests 1-5
Failed 5/5 tests, 0.00% okay
t/forkm.............
when I try to run a script I get this:
{ivrdevl01}~/daemon/Net-Daemon-0.28 > make test
PERL_DL_NONLAZY=1
/bin/perl -Iblib/arch -Iblib/lib -I/usr/local/lib/perl5/5.00503/i386-svr4 -I
/usr/local/lib/perl5/5.00503 -e 'use Test::Harness qw(&runtests $verbose);
$verbose=0; runtests @ARGV;' t/*.t
t/base..............ok
t/config............Cannot open Syslog: Can't locate syslog.ph in @INC (did
you run h2ph?) (@INC contains: blib/arch blib/lib blib/lib blib/arch
blib/arch blib/lib /usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .) at
/usr/local/lib/perl5/5.00503/Sys/Syslog.pm line 117.
Server process didn't create a file 'ndtest.prt'. at
blib/lib/Net/Daemon/Test.pm line 317.
dubious
Test returned status 2 (wstat 512, 0x200)
DIED. FAILED tests 1-5
Failed 5/5 tests, 0.00% okay
t/fork..............Cannot open Syslog: Can't locate syslog.ph in @INC (did
you run h2ph?) (@INC contains: blib/arch blib/lib blib/lib blib/arch
blib/arch blib/lib /usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/5.00503/i386-svr4
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .
/usr/local/lib/perl5/5.00503/i386-svr4 /usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i386-svr4
/usr/local/lib/perl5/site_perl/5.005 .) at
/usr/local/lib/perl5/5.00503/Sys/Syslog.pm line 117.
Server process didn't create a file 'ndtest.prt'. at
blib/lib/Net/Daemon/Test.pm line 317.
FAILED tests 1-5
Failed 5/5 tests, 0.00% okay
t/forkm.............
Thanks
From a Perl newbie
Vin
------------------------------
Date: Thu, 14 Oct 1999 16:18:04 +0200
From: Rene <spafm@gmx.net>
Subject: Problem with pack
Message-Id: <3805E61C.C97EBB06@gmx.net>
Hi All!
I have a problem with pack,
Here is my script:
#!/usr/bin/perl -w
$p = pack("B32", "1011010111110111");
($i1, $i2, $i3, $rest) = unpack("B B B B13", $p);
print "$i1 $i2 $i3 $rest\n";
Here is the result:
1 1 0 00000000
Here is, what I want:
1 0 1 1010111110111
Any ideas whats wrong with my script?
Thanks
Rene
spafm@gmx.net
------------------------------
Date: Thu, 14 Oct 1999 18:12:38 +0100
From: Jason P Tribbeck <jtribbeck@argogroup.com>
Subject: Re: Problem with pack
Message-Id: <38060F06.B73AAAE2@argogroup.com>
Rene wrote:
>
> Hi All!
>
> I have a problem with pack,
> Here is my script:
>
> #!/usr/bin/perl -w
> $p = pack("B32", "1011010111110111");
> ($i1, $i2, $i3, $rest) = unpack("B B B B13", $p);
> print "$i1 $i2 $i3 $rest\n";
>
> Here is the result:
> 1 1 0 00000000
>
> Here is, what I want:
> 1 0 1 1010111110111
>
> Any ideas whats wrong with my script?
Basically, for each B in unpack, it uses a new byte.
On my system, the pack command produces 4 bytes, values 181, 247, 0 and
0 (0xb5, 0xf7, 0x00, 0x00). The 0xb5 is from 10110101, and 0xf7 from
11110111.
The first B retrieves the high bit from the first byte (namely 0xb5),
the second B retrieves the high bit from the second byte (namely 0xf7),
and the third and fourth retrieves from the third and fourth bytes
(namely 0).
You can verify this by changing the binary values where you set $p to
0011010111110111 (0x35, 0xf7), and you'll find the answer will be 0 1 0
00000000. You can also change the other byte.
Note that this is for Intel byte orientation - YMMV.
The same is true for pack:
$p=pack("B4B4","1001","0111") will produce a two-byte string, and on my
system these are 144 (0x90) and 112 (0x70), rather than a one-byte
string of 151 (0x97).
To do what you want, you could use the following:
$bits=unpack("B32",$p);
$i1=substr($bits,0,1);
$i2=substr($bits,1,1);
$i3=substr($bits,2,1);
$rest=substr($bits,3,13);
--
Jason Tribbeck Argo Interactive
ltd
Senior Design Engineer 7 Dukes Court,
Chichester
West Sussex, PO19
2FX
Tel: +44 1243 815 815 Fax: +44 1243 815 805
England
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 1074
**************************************
