[13530] in Perl-Users-Digest
Perl-Users Digest, Issue: 940 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Sep 29 06:07:14 1999
Date: Wed, 29 Sep 1999 03:05:13 -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: <938599513-v9-i940@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 29 Sep 1999 Volume: 9 Number: 940
Today's topics:
Re: a question of buttons <davids@desertigloo.com>
Re: Can I post messages to Windows in Perl like "SendMe <csaba.raduly@sophos.com>
Re: CGI.pm POST_MAX uploading terryking@my-deja.com
Re: DB_File (Anno Siegel)
Re: DBD::Pg + SELECT not working <trueglue@kc-primary.net>
Re: Dealing with "MS-ASCII" - again! (yes, I know it is <pez68@my-deja.com>
Re: Determin IP address of client Browser (Abigail)
Re: File Upload <gellyfish@gellyfish.com>
Re: getting rid of data in array (Abigail)
Good Perl book (Stephen Cui)
Re: Good Perl book <NOSPAMmark@nl.gxn.net>
Re: Good Perl book <gellyfish@gellyfish.com>
HTML::Filter docs <steven@ircnet.dk>
Re: Inserting HTML into document using PERL (Abigail)
korn shell to perl <kkent.mehr@jrc.it>
Re: logging func has stopped logging (Abigail)
Re: looking for robust fast,scalable database engine fo (Abigail)
Re: Parsing @argv (Abigail)
Re: Pathetic Question for the Newbie <madebeer@igc.apc.org>
Re: Perl & PDF (Arved Sandstrom)
Re: Perl - SQL examples <gellyfish@gellyfish.com>
Re: Perl and GTK (Paolo Molaro)
Perl IDE for X <fromero@csudh.edu>
Re: Perl IDE for X <gellyfish@gellyfish.com>
Re: Please compare and contrast C and Perl. <neil@pacifier.com>
Re: Please compare and contrast C and Perl. <uri@sysarch.com>
Re: Please compare and contrast C and Perl. <neil@pacifier.com>
Re: Pop-Up reminder (Abigail)
Re: Problems with Win32::OLE <Christian.Habermehl@fhtw-berlin.de>
Re: question: cgi-script on server a database on server (Abigail)
Re: Regex for quotes in text database (Abigail)
Re: Sorting weird numeric data (Larry Rosler)
Re: Sorting weird numeric data (Larry Rosler)
Re: Sorting weird numeric data (Abigail)
time <matilda@crt.se>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 28 Sep 1999 23:28:34 -0700
From: "David P. Schwartz" <davids@desertigloo.com>
Subject: Re: a question of buttons
Message-Id: <37F1B192.B9910FC9@desertigloo.com>
I was never asking just about the buttons. I was asking how to determine which one
of several buttons is pressed from inside a Perl script on the server side. In this
case, there are interdependencies that exist outside of Perl. My interest lies in
the Perl end of the equation.
My apologies to everyone who doesn't think this has anything to do with programming
in Perl. And my thanks to those who have been kind enough to provide me with some
useful answers.
-David
------------------------------
Date: Wed, 29 Sep 1999 09:28:18 +0100
From: Csaba Raduly <csaba.raduly@sophos.com>
Subject: Re: Can I post messages to Windows in Perl like "SendMessage" in C++?
Message-Id: <37F1CDA2.CF86285E@sophos.com>
tiiger@my-deja.com wrote:
>
> Can I post messages to Windows in Perl like "SendMessage" in C++? I
> will using this Perl script on Win95/98.
>
If the perl script does have a window, then of course you can.
Whether it would have any effect is another matter :-)
Csaba
NOT sent via Deja.com
Bored before you buy.
--
-----BEGIN GEEK CODE BLOCK-----
Version 3.1
GCS/>GMU d- s:- a30 C++$ UL+ P+>+++ L++ E- W+ N++ o? K? w++>$ O++$ M-
V- PS PE Y PGP- t+ 5 X++ R* tv++ b++ DI+++ D++ G- e+++ h-- r-- !y+
-----END GEEK CODE BLOCK-----
Csaba Raduly, Software Developer (OS/2), Sophos Anti-Virus
mailto:csaba.raduly@sophos.com http://www.sophos.com/
US Support +1 888 SOPHOS 9 UK Support +44 1235 559933
Life is complex, with real and imaginary parts.
------------------------------
Date: Wed, 29 Sep 1999 09:03:36 GMT
From: terryking@my-deja.com
Subject: Re: CGI.pm POST_MAX uploading
Message-Id: <7sskl3$n36$1@nnrp1.deja.com>
In article <rv2e3p603i590@corp.supernews.com>,
"Scott Beck" <admin@gatewaysolutions.net> wrote:
> <terryking@my-deja.com> wrote in message
news:7sqbgs$1hf$1@nnrp1.deja.com...
> > Is there a way around this to give a friendly html error instead ?
>
> Yes there is a way around this. Use CGI::Carp
> use CGI::Carp qw(fatalsToBrowser set_message);
> BEGIN {
> sub handle_errors {
> my $msg = shift;
> print "<h1>Oh gosh</h1>";
> print "Got an error: $msg";
> }
> set_message(\&handle_errors);
> }
Cheers, exactly what I wanted. I'm fairly new to Perl and only just
starting to discover all the other goodies in those pm files !
Terry
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 29 Sep 1999 09:15:06 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: DB_File
Message-Id: <7sslar$9em$1@lublin.zrz.tu-berlin.de>
Joe Buhr <joe.buhr@motorola.com> wrote in comp.lang.perl.misc:
>Anno Siegel wrote:
>
>> Joe Buhr <joe.buhr@motorola.com> wrote in comp.lang.perl.misc:
[...]
>> >*************************************
>> >The file "test" gets created, but no data gets stored in it? Is that
>> >right?
>> >
>> >Heres a listing of the files:
>> >-rwxr-xr-x 1 buhr 3g 250 Sep 27 08:32 program1
>> >-rwxr-xr-x 1 buhr 3g 196 Sep 27 08:32 program2
>> >-rw-r--r-- 1 buhr 3g 8192 Sep 27 08:28 test
>> >
>> >
>> >If anyone can let me know what I'm doing wrong I'd appreciate it.
>>
>> What makes you think there's no data in test? The code runs fine
>> for me.
>>
>> Oh, and if all you want is numbered records (which you simulate
>> with a hash here), DB_File has the DB_RECNO option that does just
>> that:
>>
>> tie %h, "DB_File", "test", O_RDWR|O_CREAT, 0644, $DB_RECNO or
>> die "Can't create DB_File test: $!\n";
>>
>> Anno
>>
>> Anno
>
>There is data in the test file... just nothing readable. The example
>works fine for me also... when I try it on my mac, just not when I use my
>unix box. I've also tried the DB_RECNO, but it didn't work either. I'm
>thinking of grabbing the module and recompiling it... can't think of what
>else it might be.
No reason to expect "something readable" in a Berkeley DB file (that's
what the file created by the tie is). It's a database that associates
keys with values, by methods entirely its own, so what you get is
what's commonly called a binary file, not ascii text.
DB_RECNO, however, is able to deal with text files and treat them as
a sequence of records. Whether it creates a file that way by default
I don't know, but it certainly can be tweaked to do so. See the
documentation that comes with DB_File, probably supplemented by the
Berkeley DB docs. The latter are available from
http://www.scleepycat.com.
Anno
------------------------------
Date: Wed, 29 Sep 1999 02:48:46 -0500
From: Randall Munden <trueglue@kc-primary.net>
Subject: Re: DBD::Pg + SELECT not working
Message-Id: <37F1C45E.56F3167F@kc-primary.net>
try http://www.postgresql.org/docs/ for info on pgSQL. The documents
located there are excellent
Scott McMahan wrote:
>
> I've got DBD:Pg up and running on my Linux box. I can use it with no
> problems -- connect to database, do SQL, and then close the connection. I
> create tables, insert, select, drop tables, etc.
>
> BUT: When I do a SELECT of two fields from a table, and get the arrayref
> to the results, *both* columns are the first field. I can get the second
> field if it is the only field in the select statement, so the data is
> there, but the select will not work with both fields.
>
> I've never used Postgres before, and don't have any other databases to
> test with, so I don't know if this is a DBI config error, a DBD::Pg error,
> or what. The psql interpreter works okay, so it must have something to
> do with the Perl interface.
>
> Where do I even start trying to figure this out?
>
> Scott
------------------------------
Date: Wed, 29 Sep 1999 06:33:31 GMT
From: PEZ <pez68@my-deja.com>
Subject: Re: Dealing with "MS-ASCII" - again! (yes, I know it is a bad term, but we're stuck with it)
Message-Id: <7ssbrr$ghk$1@nnrp1.deja.com>
In article <7sr0ip$jt2$1@yin.interaccess.com>,
gazelle@interaccess.com wrote:
> A few months ago, I posted about the problem of dealing with text
posted to
> the net from silly word processors like MS Word and so on that have
non-ASCII
> characters in them ("non-ASCII" meaning characters whose code is >=
128)
>
I'm not sure I understand what you mean with "deal" with these files.
Do you want to convert them down to 7-bit? If so, I must ask why? In
any case it's not all that straight forward to do the conversion. For
instance take the Swedish extra three letters å (a-ring), ä (a-umlaut)
and ö (o-umlaut). (Yes, those are letters and not just accented
variants on a and o.) One way to deal with those are to strip off the
rings and dots (umlauts), an assault on the Swedish language. But on 7-
bit systems of old those have been replaced by the ASCII chars [, ], \,
{, } and |. Terminals and programs reading files like those converted
them back so that we Swedes can still see our dear extra letters. But
you can imagine how source code looks on those terminals....
I'd say at least 8 bits are needed for handling MS-ASCII (CodePage
850). Unicode and wide characters are even better, cause then CP850,
ISO-8859 et al can all fit into the same representation, along with
other, non-latin alphabets.
Regardless of 7 or 8 bits. If you are lucky enough to be on a SCO Unix
system you can find info on how to deal with this with "man mapchan"
and "man trchan". ("Lucky" here refers to the task at hand.) I'm not
sure how other systems handle it.
Regards,
/Peter Strömberg
--
-= Spam safe(?) e-mail address: pez68 at netscape.net =-
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 29 Sep 1999 01:17:28 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Determin IP address of client Browser
Message-Id: <slrn7v3c66.a6f.abigail@alexandra.delanet.com>
Derek Lavine (derek@realware.com.au) wrote on MMCCXIX September MCMXCIII
in <URL:news:MPG.125ad250870216e3989680@news.hutch.com.au>:
||
|| I have a situation where I would like to provide access to a site thus
||
|| www.mydom.mysite.com.au
||
|| The index.html auto loads a login script and I would like the login
|| script to check against a list of privilege IP addresses and for those it
|| offers slightly different options.
Assuming you are writing your own server (otherwise, you wouldn't be
posting *here*, now would you?) you should use the return value of the
accept() system call.
Abigail
--
perl -e '$_ = q *4a75737420616e6f74686572205065726c204861636b65720a*;
for ($*=******;$**=******;$**=******) {$**=*******s*..*qq}
print chr 0x$& and q
qq}*excess********}'
-----------== 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: 29 Sep 1999 09:06:42 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: File Upload
Message-Id: <37f1c892_1@newsread3.dircon.co.uk>
Isaac Hepworth <isaac.hepworth@dresdner-bank.com> wrote:
> Peter Icaza <picaza@chsi.com> wrote in message
> news:7sr0lb$32j0$1@pike.uhc.com...
>>
>> Burt Hwang <BurtHwangSPAMSUCKS@SPAMSUCKS.ufsltd.com> wrote in message
>> news:Pe2I3.7$_X2.365@client...
>> > Sorry if this is a silly question but what is "Jeopardy style"? In case
>> I'm
>> > doing it, I want to know so that I don't do it again.
>> >
>>
>> "Jeopardy style" is when you post a response in front of/on top of the
>> original post. as in Jeopardy, you get the answer first, bad dog!
>>
>
> Ah, but what he posted at the top *this* time was a question, not an answer.
>
But it was a question that was inspired by the content of the post to which
he was responding.
/J\
--
"The internet is like a car boot sale" - Jon Sopel, BBC News
------------------------------
Date: 29 Sep 1999 03:27:31 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: getting rid of data in array
Message-Id: <slrn7v3jq2.a6f.abigail@alexandra.delanet.com>
GiN (GiN@hookers.org) wrote on MMCCXIX September MCMXCIII in
<URL:news:slrn7v1hgv.30q.GiN@Avelon.net>:
##
## i have an array: @arr = qw(1 2 3 4 5 6);
##
## i want to get rid of "3" in the array.. is there an easy way to do this?
Yes. It's in the manual.
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: Tue, 28 Sep 1999 20:08:56 -1000
From: yosho@hi.net (Stephen Cui)
Subject: Good Perl book
Message-Id: <MPG.125b30b5ca50a39c989680@news.hi.net>
Can anyone recommend a great PERL book to start with and get good at? I
got a coupon for barnesandnoble.com that expires on the 30th and would
like to get me a good book..
Thanks in advance..
Stephen Cui
yosho@hi.net
------------------------------
Date: Wed, 29 Sep 1999 09:34:14 +0200
From: "Me" <NOSPAMmark@nl.gxn.net>
Subject: Re: Good Perl book
Message-Id: <7ssflm$8ik$1@blue.nl.gxn.net>
Learning Perl and Programming Perl
by O'reilly Publishers
--
Mark Spring GX Networks B.V.
email: mark@nl.gxn.net Televisieweg 2
tel: +31 36 5462400 1322 AC Almere
fax: +31 36 5462424 The Netherlands
Stephen Cui <yosho@hi.net> wrote in message
news:MPG.125b30b5ca50a39c989680@news.hi.net...
> Can anyone recommend a great PERL book to start with and get good at? I
> got a coupon for barnesandnoble.com that expires on the 30th and would
> like to get me a good book..
>
> Thanks in advance..
> Stephen Cui
>
> yosho@hi.net
------------------------------
Date: 29 Sep 1999 09:46:30 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Good Perl book
Message-Id: <37f1d1e6_1@newsread3.dircon.co.uk>
Stephen Cui <yosho@hi.net> wrote:
> Can anyone recommend a great PERL book to start with and get good at? I
> got a coupon for barnesandnoble.com that expires on the 30th and would
> like to get me a good book..
>
<http://www.perl.com/reference/query.cgi?books>
/J\
--
"I sign my paintings Vincent because people can't pronounce Van Gough"
- Vincent Van Gough
------------------------------
Date: 29 Sep 1999 09:20:31 GMT
From: Steven Cotton <steven@ircnet.dk>
Subject: HTML::Filter docs
Message-Id: <7sslkv$s2i$1@news.inet.tele.dk>
Hi,
Does anyone have any further examples of HTML::Filter, or any further docs?
I find the documentation that comes with the module not very helpful and
I really don't want to write something that's already been written, I am
unfamiliar with the callback method. Deja.com has been semi helpful, but
I'm still confused as to the use of this module.
Thanks,
--
steven
------------------------------
Date: 29 Sep 1999 04:17:36 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Inserting HTML into document using PERL
Message-Id: <slrn7v3mnv.a6f.abigail@alexandra.delanet.com>
Ion Hatzithomas (ihatzi@asus.net) wrote on MMCCXVIII September MCMXCIII
in <URL:news:7sn4jd$sbr$1@winter.news.rcn.net>:
()
() can I insert some PERL script to fill in the missing URL? Like This...
()
() <br><br>
() geturl.pl
() <p>Click here to search</p>
() <br><br>
()
() I donot want to use SSI..
Well, perhaps. But that isn't a Perl question. It's about calling a
program in a certain context. You would have to ask in a group whose
topic is that very context.
Abigail
--
perl -we '$@="\145\143\150\157\040\042\112\165\163\164\040\141\156\157\164".
"\150\145\162\040\120\145\162\154\040\110\141\143\153\145\162".
"\042\040\076\040\057\144\145\166\057\164\164\171";`$@`'
-----------== 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: Wed, 29 Sep 1999 11:41:34 +0200
From: "Kent Mehr" <kkent.mehr@jrc.it>
Subject: korn shell to perl
Message-Id: <0229D5D03F23D311922C00A0C98DEF0A10A17023@iss7.jrc.org>
I'm looking for an easy way to translate korn shell scripts to perl.
Any hints ?
------------------------------
Date: 29 Sep 1999 04:23:05 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: logging func has stopped logging
Message-Id: <slrn7v3n26.a6f.abigail@alexandra.delanet.com>
kev (kevin.porter@fast.no) wrote on MMCCXVIII September MCMXCIII in
<URL:news:37EF439D.959AD06F@fast.no>:
()
() sub baldricklog
() {
() open( LOG, ">>$basedir/baldrick.log" );
() print LOG time, "\t@_\n";
() close( LOG );
() }
()
() Today, however, it has stopped writing to the file baldrick.log. It is
() just a zero-length file with nothing ever being written to it, even
() though I still have all my baldricklog() calls still in the program.
() Can anyone tell me what is going on here?
Why should we make a guess when you don't check the return value of open?
Abigail
--
package Just_another_Perl_Hacker; sub print {($_=$_[0])=~ s/_/ /g;
print } sub __PACKAGE__ { &
print ( __PACKAGE__)} &
__PACKAGE__
( )
-----------== 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: 29 Sep 1999 04:27:01 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: looking for robust fast,scalable database engine for e-mail application
Message-Id: <slrn7v3n9k.a6f.abigail@alexandra.delanet.com>
Bernie Goldberg (goldberg@goldsoft.com) wrote on MMCCXIX September
MCMXCIII in <URL:news:IJYH3.8259$2k1.841539@news1.rdc2.on.home.com>:
[] Can anyone direct me to a fast,scalable database engine for an e-mail
[] application.
What kind of email application? What do you want to do? And why are you
asking *here*? This group isn't about databases.
[] Are there any cgi scripts which can be used to create a hotmail type
[] service?
Try Matt Wright's archive. Hotmail was coded using just 50 lines of code!
Abigail
--
perl -wle 'print "Prime" if (1 x shift) !~ /^1?$|^(11+?)\1+$/'
-----------== 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: 29 Sep 1999 04:28:48 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Parsing @argv
Message-Id: <slrn7v3ncu.a6f.abigail@alexandra.delanet.com>
Brian Orpin (abuse@borpin.demon.co.uk) wrote on MMCCXVIII September
MCMXCIII in <URL:news:xHXvN=Y2uHGMBWYpVIWWpgQLaA92@4ax.com>:
:: Is there a simple way of parsing @ARGV? I am sure that I have seen a
:: parse-argv module in the past but can find no reference to it (but may
:: not have looked in the right place).
There are many Getopt:: modules out there.
Abigail
--
perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\n";'
-----------== 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, 28 Sep 1999 23:43:45 -0700 (PDT)
From: Michael de Beer <madebeer@igc.apc.org>
Subject: Re: Pathetic Question for the Newbie
Message-Id: <APC&1'0'50775dd0'aed@igc.apc.org>
>How would I use the cgi parser with this file?? Thanks for your help
>in advance.
require 'cgi-lib.pl'; # load cgi related functions
... # use one of these functions for reading form data
# or writing HTML
if cgi-lib.pl isn't in your path, try
require '/var/www/cgi-bin/cgi-lib.pl';
HTH,
-Mike
------------------------------
Date: Wed, 29 Sep 1999 06:43:54 -0300
From: Arved_37@chebucto.ns.ca (Arved Sandstrom)
Subject: Re: Perl & PDF
Message-Id: <Arved_37-2909990643540001@dyip-14.chebucto.ns.ca>
In article <37F0B8ED.52C91726@qama.fr>, PL Lamballais
<pl.lamballais@qama.fr> wrote:
> Hello,
>
> I'm looking for a Perl 5 library in order to generate PDF files on the fly.
> I've found some libraries allowing generation with text and poor graphism like
> bar, pie and so on, but I want to add pictures inside the document.
> Do you know where I can find that?
>
Your wish may be for Perl, but sometimes you have to be flexible. :-) I
could be wrong, but I'm not aware of any Perl scripts or modules that
address more than text->PDF. Your best bets for more functionality right
now are C libraries - there are a number (I like ClibPDF).
Best place for PDF one-stop shopping is http://www.pdfzone.com. That will
tell you what is available.
Arved
------------------------------
Date: 29 Sep 1999 09:16:28 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Perl - SQL examples
Message-Id: <37f1cadc_1@newsread3.dircon.co.uk>
Jason Q. <jason@generationterrorists.com> wrote:
> Hi
>
> Where on to net can I find examples/tutorials on using Perl together
> with SQL commands?
>
> In particular, I'm looking to query a database with multiple keywords
> using SQL and Perl.
>
You will need to use the appropriate DBI database interface - DBI and the
various DBD modules are available from CPAN - the documentation has examples.
/J\
--
"The only man in the cabinet who supported them was that fucking lunatic
Redwood" - John Major
------------------------------
Date: 29 Sep 1999 09:32:53 GMT
From: lupus@lettere.unipd.it (Paolo Molaro)
Subject: Re: Perl and GTK
Message-Id: <slrn7v3nh3.9gq.lupus@bacco.lettere.unipd.it>
On Thu, 23 Sep 1999 14:14:26 +0200, G.G. <goralg@friko2.onet.pl> wrote:
> I am looking for links to documents (manuals, FAQ etc) about using GTK
> in Perl programs.
You can check the examples in the source tarball.
If you build the latest release (0.6123) or the version from the gnome
cvs server you get also a reference manual in pod format.
lupus
--
-----------------------------------------------------------------
lupus@debian.org debian/rules
------------------------------
Date: Wed, 29 Sep 1999 00:01:30 -0700
From: Francisco Romero <fromero@csudh.edu>
Subject: Perl IDE for X
Message-Id: <37F1B948.CC233834@csudh.edu>
Does anyone know if there is an Integrated Developmental Enviornment for
perl?
Is there anything to help me write Perl code in X ?
------------------------------
Date: 29 Sep 1999 09:34:04 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Perl IDE for X
Message-Id: <37f1cefc_1@newsread3.dircon.co.uk>
Francisco Romero <fromero@csudh.edu> wrote:
> Does anyone know if there is an Integrated Developmental Enviornment for
> perl?
>
> Is there anything to help me write Perl code in X ?
>
<http://www.perl.com/reference/query.cgi?editors>
/J\
--
"Some saw Noel Edmonds as a stinking slimy downmarket local rep from a
package holiday firm. His critics were less kind" - Victor Lewis-Smith,
TV Offal
------------------------------
Date: 28 Sep 1999 23:06:17 PST
From: Neil <neil@pacifier.com>
Subject: Re: Please compare and contrast C and Perl.
Message-Id: <37f1ac59.0@news.pacifier.com>
> N> So a Perl program is like a shell script, in that a Perl program is
> N> comprised of a series of of utilities that are called during the
> N> execution of the program?
> too bad, since your statement above is wrong. perl is nothing like shell
> scripts and nothing like c but it inherits ideas from both of them (as
> well as many other languages and systems including awk, sed, lisp and
> good ol' unix). you are not going to get a good comparison of perl vs. c
> since that is not a good question. a better one would be "is this
> project (fill in the project) better done in perl or c (or some other
> luser language).
You'll notice that it was not a statement but was framed as a question.
By framing it as a question, I was inquiring as to its truth or not truth.
> and comparing computer languages usually requires knowledge of more than
> just two and a decent background in computer science. a poor analogy
> would be to compare a cadillac to a minivan. they both are cars and can
> transport people but they are otherwise very different and have
> different goals.
That's why I take college level computer science courses, to get a better
understanding. That doesn't mean that discussion is verboten until I have
reached enlightenment.
Neil
------------------------------
Date: 29 Sep 1999 02:29:49 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Please compare and contrast C and Perl.
Message-Id: <x7wvtaw7qa.fsf@home.sysarch.com>
>>>>> "N" == Neil <neil@pacifier.com> writes:
N> You'll notice that it was not a statement but was framed as a
N> question. By framing it as a question, I was inquiring as to its
N> truth or not truth.
well you got an answer didn't you?
N> That's why I take college level computer science courses, to get a
N> better understanding. That doesn't mean that discussion is verboten
N> until I have reached enlightenment.
then you should be able to read some perl docs and learn enough to
determine the differences yourself. and the discussion has been done
before and there are plenty of site which cover it. so posting the
question here is not appropriate. at least it isn't going to start
another perl vs. python/java/c/etc
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: 28 Sep 1999 23:58:56 PST
From: Neil <neil@pacifier.com>
Subject: Re: Please compare and contrast C and Perl.
Message-Id: <37f1b8b0.0@news.pacifier.com>
> then you should be able to read some perl docs and learn enough to
> determine the differences yourself. and the discussion has been done
> before and there are plenty of site which cover it. so posting the
> question here is not appropriate. at least it isn't going to start
> another perl vs. python/java/c/etc
The purpose of my question was not to determine which of the languages
people think is better, nor was it intended to start a religious war. And
I didn't mention Python or Java.
I did not ask, "Which is better, Perl or python/java/c/etc?"
Neil
------------------------------
Date: 29 Sep 1999 04:45:22 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Pop-Up reminder
Message-Id: <slrn7v3oc0.a6f.abigail@alexandra.delanet.com>
Dale Bohl (dbohl@sgi.com) wrote on MMCCXIX September MCMXCIII in
<URL:news:37F0D6C3.56C3D663@sgi.com>:
@@
@@ Does anyone know where I can get a pop-up gui reminder
@@ that will pop up for a short time or be terminated
@@ when a button is clicked?
And your Perl question is?
Abigail
--
echo "==== ======= ==== ======"|perl -pes/=/J/|perl -pes/==/us/|perl -pes/=/t/\
|perl -pes/=/A/|perl -pes/=/n/|perl -pes/=/o/|perl -pes/==/th/|perl -pes/=/e/\
|perl -pes/=/r/|perl -pes/=/P/|perl -pes/=/e/|perl -pes/==/rl/|perl -pes/=/H/\
|perl -pes/=/a/|perl -pes/=/c/|perl -pes/=/k/|perl -pes/==/er/|perl -pes/=/./;
-----------== 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: Wed, 29 Sep 1999 11:58:43 +0100
From: Christian Habermehl <Christian.Habermehl@fhtw-berlin.de>
Subject: Re: Problems with Win32::OLE
Message-Id: <37F1F0E3.6A66CD71@fhtw-berlin.de>
Thanks, you were right the main problem was not checking the
success of gettinmg connected to the Database. Now my program
doesn't crash but SOMETIMES hangs up. I think it has something to
do with the database or the Connection (I'm using MS SQL Server 6.5).
At the following commands the program stops and has to be cancelled.
$MyCommand->{ActiveConnection} = $DatabaseConnection;
$TestRecord = $DatabaseConnection->Execute("SELECT * FROM testtable");
Do you know, how I can prevent that errors (the variables were
initialized correctly and the database-connection worked some lines in
code before)?
Thank you
Christian
------------------------------
Date: 29 Sep 1999 04:56:55 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: question: cgi-script on server a database on server b
Message-Id: <slrn7v3p1l.a6f.abigail@alexandra.delanet.com>
Thorsten Muschler (thorsten.muschler@uni-essen.de) wrote on MMCCXIX
September MCMXCIII in <URL:news:7sr3k9$ihl$1@fu-berlin.de>:
;; hi!
;;
;; a have got a small problem:
;;
;; a have web-space on server a and a
;; cgi-directory on server b.
;;
;; my cgi-script on server b reads and writes a
;; txt file on server a.
;;
;; the cgi is written like the txt file
;; is on the same server in the same directory.
;;
;; now i have to modify it but don´t know how:
;;
;; here is the relevant part of the script:
;;
;; $fields = 7; # Number of fields in each record
;; $filename = "urls.txt"; # The database text file
;; $results = 1000; # maximum number of results to display
Eh? That's just defining a few variables. If that's the most
relevant part of the script.... then what is your script doing?
;; for example the urls.txt file should be stored
;; on the server http://www.myserver.de/datebase/urls.txt
;;
;; how do i have to modify and how?
Well, the simplest solution is not to scatter your program and data
around over various servers. Why don't you put them on the same server?
As for putting files on different machines, there are zillions of protocols
for that. Pick one you like, and implement it. For some, there are even
modules on CPAN. Some of the most well known protocols are NFS and UUCP.
Abigail
--
sub _'_{$_'_=~s/$a/$_/}map{$$_=$Z++}Y,a..z,A..X;*{($_::_=sprintf+q=%X==>"$A$Y".
"$b$r$T$u")=~s~0~O~g;map+_::_,U=>T=>L=>$Z;$_::_}=*_;sub _{print+/.*::(.*)/s}
*_'_=*{chr($b*$e)};*__=*{chr(1<<$e)};
_::_(r(e(k(c(a(H(__(l(r(e(P(__(r(e(h(t(o(n(a(__(t(us(J())))))))))))))))))))))))
-----------== 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: 29 Sep 1999 05:00:26 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Regex for quotes in text database
Message-Id: <slrn7v3p88.a6f.abigail@alexandra.delanet.com>
Kim Saunders (kims@emmerce.com.au) wrote on MMCCXX September MCMXCIII in
<URL:news:938579711.779677@draal.apex.net.au>:
()
() Would someone be so kind as to help me out with a regex to strip *unwanted*
() (as opposed to all) double-quotes (") from a string. They are always at the
() start and end of the string.
You want the /u modifier. That only removes unwanted characters.
Abigail
--
perl -e '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %;
BEGIN {% % = ($ _ = " " => print "Just Another Perl Hacker\n")}'
-----------== 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, 28 Sep 1999 23:07:22 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Sorting weird numeric data
Message-Id: <MPG.125b4c73c8938ebd989ff9@nntp.hpl.hp.com>
In article <slrn7v39c3.a6f.abigail@alexandra.delanet.com> on 29 Sep 1999
00:29:28 -0500, Abigail <abigail@delanet.com> says...
> Uri Guttman (uri@sysarch.com) wrote on MMCCXX September MCMXCIII in
...
> $$ i just knew you would nail this benchmark. and the GRP (fair name for
> $$ now) is much simpler code as well.
>
> Simpler? I've never seen any code that use pack that I find simple.
> After years of using Perl, I still need to manual and 47 tries to get
> it right when using pack/unpack.
I'm much better at it. It only takes me 20 tries, more or less. And
the manual for those functions is essentially useless.
> The code below is trivial, and requires no thinking when writing down.
Cute, yes. Slow, yes. Trivial, not quite. And who ever thinks when
coding, anyhow?
I am the Anti-Dijkstra. Coding is an experimental science^Wblack art.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Tue, 28 Sep 1999 23:31:45 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Sorting weird numeric data
Message-Id: <MPG.125b521e4be6b6bd989ffa@nntp.hpl.hp.com>
In article <slrn7v3959.a6f.abigail@alexandra.delanet.com> on 29 Sep 1999
00:25:46 -0500, Abigail <abigail@delanet.com> says...
> Larry Rosler (lr@hpl.hp.com) wrote on MMCCXX September MCMXCIII in
> <URL:news:MPG.125b0e6868abb18f989ff8@nntp.hpl.hp.com>:
> <>
> <> sub Packed {
> <> my @sorted = map substr($_, 5) =>
> ^
> |
>
> Does this mean your solution
> has arbitrary limits?
> <> sort
> <> map pack('C5' => split /\./) . $_ => @unsorted;
> <> }
It can be a parameter, chosen conservatively. Or it can be computed
from the data:
my ($n, $m) = 0;
$n < ($m = tr/.//) and $n = $m for @unsorted;
++$n;
my @sorted = map substr($_, $n) => sort
map pack("C$n" => split /\./) . $_ => @unsorted;
There is also an assumption that the integers in the data are smaller
than 1 << 8. This can be checked in the same prepass, and the
appropriate conversion specifier chosen from the set 'C', 'n', 'N'. (I
looked at the `perlfunc -f pack` doc to be sure of that last bit. :-)
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 29 Sep 1999 03:21:52 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Sorting weird numeric data
Message-Id: <slrn7v3jf7.a6f.abigail@alexandra.delanet.com>
Uri Guttman (uri@sysarch.com) wrote on MMCCXX September MCMXCIII in
<URL:news:x7670uxnlx.fsf@home.sysarch.com>:
\\
\\ oh balderdash! i could read larry's GRP sort in seconds while i had to
\\ really parse your code and find the hidden loop made by redo. talk about
\\ a rarely used operator. so to each their own. once you use pack a
\\ little, most of the field names are easy to remember. i don't know them
\\ all by heart but C, N, H, A are burned in my brain. and the rest are
\\ only a perldoc away. do you know all the options to printf? i still
\\ check on some, so this is no different. i am amazed you look down on
\\ such a powerful and useful operator like pack.
It's not the number of options. It's the fact that pack/unpack go lower
than my preferred level of abstraction. You need to know too many
implementation details.
\\ true, complex lists of pack fields can be confusing but this uses just
\\ C5 which is 5 unsigned chars. pretty easy to figure out.
Unsigned chars? That's the *problem*. It's not Perl. Perl has scalars.
Unsigned chars is C. If I would want to code in C, I know where to get it.
I prefer coding in Perl.
Abigail
--
perl -e '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %;
BEGIN {% % = ($ _ = " " => print "Just Another Perl Hacker\n")}'
-----------== 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: Wed, 29 Sep 1999 10:36:18 +0200
From: Matilda Dahlqvist <matilda@crt.se>
Subject: time
Message-Id: <Pine.GSO.4.10.9909291034120.20894-100000@krakatau.firedoor.se>
Is there any way how I can measure time in a program other than seconds, I
need milliseconds at least.
I have tried using benchmarks but the result is always in seconds.
Matilda
Microsoft's biggest and most dangerous contribution to the software
industry may be the degree to which it has
lowered user expectations.
------------------------------
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 940
*************************************
