[13797] in Perl-Users-Digest
Perl-Users Digest, Issue: 1207 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Oct 28 00:10:45 1999
Date: Wed, 27 Oct 1999 21:10:18 -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: <941083817-v9-i1207@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 27 Oct 1999 Volume: 9 Number: 1207
Today's topics:
Re: Is this a bug? <blakem@world.std.com>
Re: Is this a bug? (Matthew Bafford)
Re: Is this a bug? <rootbeer@redcat.com>
Re: Just to get rid of dos prompt window. (Matthew David Zimmerman)
Re: length (number of items) of an array (Philip 'Yes, that's my address' Newton)
Re: linking to perl script to html page. <rootbeer@redcat.com>
Re: Make Dir. (Abigail)
Re: Need a hand-Databases, Hahses, and Odd Photos. <garmark2NOgaSPAM@hotmail.com.invalid>
Re: offtopic: DFA backreferences? (Abigail)
Re: Pallel Port with Perl on Win98 <mike.palmer@ssi.com>
Re: Perlshop (Abigail)
Re: POST data to a perl program, from a perl program <rootbeer@redcat.com>
Re: quiet warnings while distinguishing zero from undef (Abigail)
Re: quite and dirty date conversion <lr@hpl.hp.com>
Re: Scripts that invoke one another via Location: and/o (Ben Blish)
Re: Scripts that invoke one another via Location: and/o <rootbeer@redcat.com>
Re: several questions about perl (Martien Verbruggen)
Re: Stored procedure with parameters. <rootbeer@redcat.com>
Re: uniq and perl <shon@mad.scientist.com>
Re: What makes the web go? (Abigail)
Re: What makes the web go? (Martien Verbruggen)
Re: What makes the web go? (brian d foy)
Re: Why does this print 'bar'? <lr@hpl.hp.com>
Re: Why does this print 'bar'? <uri@sysarch.com>
Re: Why does this print 'bar'? (Martien Verbruggen)
Re: Why extra junk at end of new file? <rootbeer@redcat.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 27 Oct 1999 21:21:55 -0400
From: Blake Meike <blakem@world.std.com>
Subject: Re: Is this a bug?
Message-Id: <3817A2A0.E5F1D3F4@world.std.com>
>What does it do, and what do you expect it to do?
Fair enough! There are two runs below, the first on a Linux box, and
the second on a Solaris. I have recently tried the code on a third
machine -- and it appears to behave as I expect.
Blake Meike
Adero, Inc.
***The code:
#!/usr/bin/perl -w
use strict;
my $MAX_THREADS = 2;
my $threads = 0;
while (<DATA>) {
print STDERR "$.: $_";
while ($threads >= $MAX_THREADS) {
wait();
$threads--;
}
unless (fork()) { sleep 2; exit; }
$threads++;
}
__END__
1
2
3
4
***Expected results:
1: 1
2: 2
3: 3
4: 4
***Actual results, on Linux:
edinburgh>./test
1: 1
2: 2
3: 3
4: 4
5: _
6: 1
7: 2
8: 3
9: 4
10: +;
11: }
12:
13: __END__
14: 1
15: 2
16: 3
17: 4
18: unless (fork()) { sleep 2; exit; }
19:
20: $threads++;
21: }
22:
23: __END__
24: 1
25: 2
^C
edinburgh>/usr/bin/perl -V
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
Platform:
osname=linux, osvers=2.0.34, archname=i686-linux
uname='linux edinburgh.adero.net 2.0.34 #2 fri dec 18 20:34:02 utc
1998 i686 unknown '
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef useperlio=undef d_sfio=undef
Compiler:
cc='cc', optimize='-O2', gccversion=2.7.2.3
cppflags='-Dbool=char -DHAS_BOOL -I/usr/local/include'
ccflags ='-Dbool=char -DHAS_BOOL -I/usr/local/include'
stdchar='char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
alignbytes=4, usemymalloc=n, prototype=define
Linker and Libraries:
ld='cc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt
libc=, so=so, useshrplib=false, libperl=libperl.a
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
Characteristics of this binary (from libperl):
Built under linux
Compiled at Aug 4 1999 16:58:56
@INC:
/usr/local/lib/perl5/5.00503/i686-linux
/usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i686-linux
/usr/local/lib/perl5/site_perl/5.005
.
***Actual results, on Solaris:
mercury>./test
1: 1
2: 2
3: 3
4: 4
5: _
6: 1
7: 2
8: 3
9: 4
10:
11: }
12:
13: __END__
14: 1
15: 2
16: 3
17: 4
18: unless (fork()) { sleep 2; exit; }
19:
20: $threads++;
21: }
22:
23: __END__
24: 1
25: 2
26: 3
27: 4
^C
mercury>/usr/bin/perl -V
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
Platform:
osname=solaris, osvers=2.6, archname=sun4-solaris
uname='sunos mercury 5.6 generic_105181-15 sun4u sparc sunw,ultra-2 '
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef useperlio=undef d_sfio=undef
Compiler:
cc='gcc -B/usr/ccs/bin/', optimize='-O', gccversion=2.7.2.3
cppflags='-I/usr/local/include -I/opt/gnu/include'
ccflags ='-I/usr/local/include -I/opt/gnu/include'
stdchar='unsigned char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
alignbytes=8, usemymalloc=y, prototype=define
Linker and Libraries:
ld='gcc -B/usr/ccs/bin/', ldflags =' -L/usr/local/lib -L/opt/gnu/lib'
libpth=/usr/local/lib /opt/gnu/lib /lib /usr/lib /usr/ccs/lib
libs=-lsocket -lnsl -ldb -ldl -lm -lc -lcrypt
libc=/lib/libc.so, so=so, useshrplib=false, libperl=libperl.a
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' '
cccdlflags='-fPIC', lddlflags='-G -L/usr/local/lib -L/opt/gnu/lib'
Characteristics of this binary (from libperl):
Built under solaris
Compiled at Aug 6 1999 19:50:36
@INC:
/usr/local/lib/perl5/5.00503/sun4-solaris
/usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/sun4-solaris
/usr/local/lib/perl5/site_perl/5.005
.
------------------------------
Date: Thu, 28 Oct 1999 02:29:38 GMT
From: *@dragons.duesouth.net (Matthew Bafford)
Subject: Re: Is this a bug?
Message-Id: <slrn81fci1.14h.*@dragons.duesouth.net>
On Wed, 27 Oct 1999 22:49:24 GMT, Blake Meike) poured coffee onto a
keyboard, producing the following in comp.lang.perl.misc:
: The following program doesn't behave in at all the way I would expect.
: Is this a bug, or have I overlooked something.
> cat test
#!/usr/bin/perl -w
use strict;
my $MAX_THREADS = 2;
my $threads = 0;
while (<DATA>) {
print STDERR "$.: $_";
while ($threads >= $MAX_THREADS) {
wait();
$threads--;
}
unless (fork()) { sleep 2; exit; }
$threads++;
}
__END__
1
2
3
4
> perl test
1: 1
2: 2
3: 3
<short delay>
4: 4
> perl -V
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
Platform:
osname=linux, osvers=2.2.5-15, archname=i686-linux
uname='linux dragons.duesouth.net 2.2.5-15 #1 sat jul 10 13:56:07 edt 1999 i686 unknown '
hint=previous, useposix=true, d_sigaction=define
usethreads=undef useperlio=undef d_sfio=undef
Compiler:
cc='cc', optimize='-O2', gccversion=egcs-2.91.66 19990314/Linux (egcs-1.1.2 release)
cppflags='-Dbool=char -DHAS_BOOL'
ccflags ='-Dbool=char -DHAS_BOOL'
stdchar='char', d_stdstdio=undef, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
alignbytes=4, usemymalloc=y, prototype=define
Linker and Libraries:
ld='cc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt
libc=, so=so, useshrplib=true, libperl=libperl.so
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic -Wl,-rpath,/usr/local/lib/perl5/5.00503/i686-linux/CORE'
cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
Characteristics of this binary (from libperl):
Built under linux
Compiled at Jul 10 1999 22:46:17
@INC:
/usr/local/lib/perl5/5.00503/i686-linux
/usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/i686-linux
/usr/local/lib/perl5/site_perl/5.005
.
>
: Blake Meike
--Matthew
------------------------------
Date: Wed, 27 Oct 1999 20:50:29 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Is this a bug?
Message-Id: <Pine.GSO.4.10.9910272047050.29843-100000@user2.teleport.com>
On Wed, 27 Oct 1999, Blake Meike wrote:
> ***Actual results, on Linux:
>
> edinburgh>./test
> 1: 1
> 2: 2
> 3: 3
> 4: 4
> 5: _
> 6: 1
> 7: 2
> 8: 3
> 9: 4
> 10: +;
> 11: }
I seem to recall that someone recently fixed a bug that affected the
position of the DATA pointer during fork calls, so this problem may be
fixed in 5.6. If you install a recent development-for-experimental-use-
only-not-even-beta-yet version and still see this behavior, you should
file a bug report with perlbug.
Thanks!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 28 Oct 1999 03:18:48 GMT
From: mdz4c@node13.unix.Virginia.EDU (Matthew David Zimmerman)
Subject: Re: Just to get rid of dos prompt window.
Message-Id: <7v8fao$gg4$1@murdoch.acc.Virginia.EDU>
In article <380640CC.FB326CA6@sympatico.ca>,
Guo Quin <cau.quach@sympatico.ca> wrote:
>Hello. Please answer one of following questions.
>
>1/How can I add --more-- to "perldoc -f xxxx and/or perdoc -q xxxx"
>(MSWindows) ?
perldoc -f xxxx | more
perldoc -q xxxx | more
>2/How can I "perldoc (as above) > text_file" (MSwindows) ?
perldoc -f xxxx > textfile
should work under MS-DOS 6.22.
>3/How to put "perldoc (as above)" in a perl script to print output in
>www
>browser ?
http://www.perl.com/pub/v/documentation :)
Not to mention that you should have www versions of the docs if you have
Activestate. Look around somewhere (dir called 'html', maybe? )
Matt
--
Matthew Zimmerman ------------ http://www.people.virginia.edu/~mdz4c
Interdisciplinary Biophysics Program --------- University of Virginia
| "You got to be very careful if you don't know where you're going, |
| because you might not get there." -- Yogi Berra |
------------------------------
Date: Thu, 28 Oct 1999 03:44:06 GMT
From: nospam.newton@gmx.li (Philip 'Yes, that's my address' Newton)
Subject: Re: length (number of items) of an array
Message-Id: <3817c40d.337082081@news.nikoma.de>
On Wed, 27 Oct 1999 06:40:41 -0400, tadmc@metronet.com (Tad McClellan)
wrote:
>Staffan Hämälä (sh@otto.dc.luth.se) wrote:
>: Daniel Krajzewicz <krajzewicz@inx.de> writes:
>: > How do I get the number of items (the length of) an array ?
>: print "$#arr" . "\n";
> You have an off-by-one error there.
No -- he has an off-by-abs($[-1) error there.
Cheers,
Philip
--
Philip Newton <nospam.newton@gmx.li>
------------------------------
Date: Wed, 27 Oct 1999 20:03:31 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: linking to perl script to html page.
Message-Id: <Pine.GSO.4.10.9910272000110.29843-100000@user2.teleport.com>
On Wed, 27 Oct 1999, Tom Kralidis wrote:
> I want to make an existing html page a derived-cgi page, however, I
> don't want people to update their links / bookmarks.
It sounds as if you want your webserver to do something when a certain
request comes in. Perhaps you should ask your local expert or webmaster,
since even if we could somehow guess how everything works at your site, a
newsgroup about Perl wouldn't be a place to discuss it.
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 27 Oct 1999 21:47:21 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Make Dir.
Message-Id: <slrn81fe8s.66b.abigail@alexandra.delanet.com>
Steffan S. Fallesen (ssf@fallesen-internet.dk) wrote on MMCCXLVII
September MCMXCIII in <URL:news:%5kR3.282$wo.662@news.get2net.dk>:
;;
;; How do I make a directory via Perl on my webserver??
my $function = 'a';
my $directory = 'whatever';
{ last -d $directory;
my $str = "$function $directory";
{ eval $str;
last unless $@ =~ /Not enough arguments/;
$str .= ", undef";
redo
}
$function ++;
redo
}
HTH. HAND.
Abigail
--
package Z;use overload'""'=>sub{$b++?Hacker:Another};
sub TIESCALAR{bless\my$y=>Z}sub FETCH{$a++?Perl:Just}
$,=$";my$x=tie+my$y=>Z;print$y,$x,$y,$x,"\n";#Abigail
-----------== 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, 27 Oct 1999 20:20:36 -0700
From: garmark <garmark2NOgaSPAM@hotmail.com.invalid>
Subject: Re: Need a hand-Databases, Hahses, and Odd Photos.
Message-Id: <2750ac20.926ca758@usw-ex0106-042.remarq.com>
thanks to all who helped me with this, but i lost the urge to work on
it with the hashes, so i took a different rout and it works simmilarly
but not as nice.
script is at: http://localm.org/photos/photos.cgi
database is at: http://localm.org/photos/data/photos.dat
So anyway thanks for the replies, i appriciate it.
blaine
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: 27 Oct 1999 22:29:29 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: offtopic: DFA backreferences?
Message-Id: <slrn81fgnr.66b.abigail@alexandra.delanet.com>
Paul Johnston (johnston.p@worldnet.att.net) wrote on MMCCXLVIII September
MCMXCIII in <URL:news:7v5mtp$b0g$1@bgtnsc01.worldnet.att.net>:
^^
^^ Hmm, I see. But why? It seems strange to me that a grammar classification
^^ ("Regular Grammars") would be predicated on what appears to me as an
^^ implementation detail (memory). In other words, it seems that the
^^ classification is not really based on some total mathematical abstraction,
^^ which is what I guess I would expect it to be. OR, I could also imagine
^^ that the definition &| mathematics of regular grammars was influenced by the
^^ state of hardware and software at the time (ie an "FSA" was built and the
^^ definition/math grew out of it's behavior).
The study of regular languages and automata dates from the first half
of the 40s. That the first hardware and software were appearing around
the time is a mere coincidence.
Memory is not an implementation detail. Regular languages were first
used to study neuron nets; consisting of "simple" elements whose
output state purely depends on the input. Other circuit like constructs
can be described with regular languages as well - including mechanical
circuits, for which adding memory certain would not be an implementation
detail.
^^ The next step I would take in my mind, then, is that a FSA is not an
^^ abstract concept, but a well-defined "thing". Is this right? This may
^^ sound ridiculous to those that have been thinking about this stuff for
^^ years...
Yes. Well definedness is a good thing. Properties of regular languages are
well known. Certain questions you can ask about a language, or a group
of languages, are solvable if you know the language is regular, but
insolvable if they are context free.
One other very important aspect of classification and the study of the
classes is that you can proof certain things are infeasable. If you have
a certain language and you wonder if you can construct a FSA or a PDA
such that it can be recognized, what do you do? Certainly, you can try,
and if you find one then you are done. But what if you don't find one?
Didn't you try hard enough, or isn't there such an automaton? There
are techniques to prove whether a language is a regular language, or a
context free language, or not.
But now you come with a language, and ask "is there a Perl regular
expression for it that recognizes it?". You post the question here,
and noone comes up with a regex.
Does that mean such a regex doesn't exist? Well, you don't know. You
can of course study the internals of the Perl regex machine, and come up
with a proof - but you won't be able to use 5 decades of work of giants.
Abigail
--
perl -wlne '}for($.){print' file # Count the number of lines.
-----------== 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, 27 Oct 1999 19:17:20 -0700
From: "Mike Palmer" <mike.palmer@ssi.com>
Subject: Re: Pallel Port with Perl on Win98
Message-Id: <7v8bmt$4m8@tu228.tus.ssi1.com>
Olaf,
Depends. I can't speak to the case where you need standard serial port
access - like you would need if you were talking to an external modem. But,
if you need bit level control over the parallel port, then you'll need a
driver that provides that level of access. Under Win16, you can access the
serial port using inport/outport type commands, but not in Win32. Most of
the drivers I've seen have some kind of DLL interface available. There is a
perl module available from ActiveState that will let you open and access the
routines in a generic DLL.
As I recall, one of the shareware drivers is called tvichw32 (can't remember
for sure). I can't remember the name of the perl module off hand either, but
it's covered in the windows FAQ somewhere. Make sure you use the up to date
module, not the deprecated one (there are lots of copies of the old one
around - I fought with that for a day before finally realizing that there
was something newer).
-- Mike --
Olaf Kaul <olaf.kaul@rz-online.de> wrote in message
news:381712f6.3145452@news.rhein-zeitung.de...
> Hi,
>
> How can I set the parallel port with Perl under win98.
> I like to connect a stepper motor to the Port and control the motor.
>
> so long Olaf
------------------------------
Date: 27 Oct 1999 22:48:30 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Perlshop
Message-Id: <slrn81fhrf.66b.abigail@alexandra.delanet.com>
Arnold Goldman (arnold@monstermakers.com) wrote on MMCCXLVIII September
MCMXCIII in <URL:news:3816431E.3126@monstermakers.com>:
!!
!! Wondering if my might be able to draw on the collective wisdom of this
!! newsgroup. I have had PerlShop running on my website flawlessless for
!! many months when all the sudden it reports, " Invalid Transmission #3
!! received from: 207.86.135.21 If your connection was interrupted, you
!! must Enter the shop from the beginning again."
> quit
You drop your longword.
You drop your chainmail.
You drop your torch (lit).
You drop your smelly cheese.
Thank you for playing GiggleMUD!
$ !!
Trying 127.0.0.1...
Connected to connect.gigglemud.int
Escape character is '^]'
Welcome to GiggleMUD!
What is your name: Arnold
What is your password:
You are in the church. There is an exit south.
> s
You walk out of the church.
You are at an open green place south of the ruin of the village
church. You can see a road further to the east.
Obvious exists: north, west, east.
> e
A track going into the village. The track opens up to a road to
the east and ends with a green lawn to the west.
Obvious exists: west, east.
> e
A long road going east through the village. The road narrows
to a track to the west. There is an alley to the north and the south.
Obvious exists: north, west, south, east.
> e
A long road going through the village. The road continues to the west.
To the north is the shop, and to the south is the adventurers guild.
The road runs towards the shore to the east.
Igor the comrade stands here.
Obvious exists: north, west, south, east.
> Igor says: Hello, Arnold, long time no see!
smile igor
You smile at Igor.
> Igor smiles at you.
n
You are in a shop. You can buy or sell things here. There is a
sign behind the counter. A blue forcefield blocks your way north.
A longsword, a chainmail, a torch (lit), a smelly cheese and
a trashcan are here.
> Igor enters.
Igor gets a longsword, a chainmail, a torch (lit) and a smelly cheese.
Igor wields a longsword.
Igor wears a chainmail.
Igor eats a smelly cheese.
> buy transmission
A new transmission would cost you 2756 gold coins.
You only have 3 copper coins.
> sad
You look so sad!
> Igor comforts you.
Oh well. I guess you have to explore, solve some quests and gain more
experience!
But don't kill Igor - he's my friend.
Abigail
--
sub camel (^#87=i@J&&&#]u'^^s]#'#={123{#}7890t[0.9]9@+*`"'***}A&&&}n2o}00}t324i;
h[{e **###{r{+P={**{e^^^#'#i@{r'^=^{l+{#}H***i[0.9]&@a5`"':&^;&^,*&^$43##@@####;
c}^^^&&&k}&&&}#=e*****[]}'r####'`=437*{#};::'1[0.9]2@43`"'*#==[[.{{],,,1278@#@);
print+((($llama=prototype'camel')=~y|+{#}$=^*&[0-9]i@:;`"',.| |d)&&$llama."\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, 27 Oct 1999 19:45:39 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: POST data to a perl program, from a perl program
Message-Id: <Pine.GSO.4.10.9910271943180.29843-100000@user2.teleport.com>
On Wed, 27 Oct 1999, Max wrote:
> how can i send data via POST method from one perl script to another
> without having to print any html code, just using strictly perl??
It sounds as if you're wanting to implement the server's side of the CGI
protocol.
http://hoohoo.ncsa.uiuc.edu/cgi/
If you have further questions about the CGI protocol after reading the
spec, try comp.infosystems.www.authoring.cgi and related newsgroups.
It may be that you wish to send a request to a webserver, rather than to a
program. In that case, the LWP bundle on CPAN may help you.
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 27 Oct 1999 22:51:26 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: quiet warnings while distinguishing zero from undef for SQL
Message-Id: <slrn81fi10.66b.abigail@alexandra.delanet.com>
Alan Mead (adm@ipat.com) wrote on MMCCXLVII September MCMXCIII in
<URL:news:3815cc91.92671786@news.soltec.net>:
~~ I am parsing CSV to insert into an SQL table. CSV distinguishs
~~ between zero (and other values) and undef. But apparently SQL (e.g.,
~~ MySQL) won't let me insert NULL values. So I guess I need to test the
~~ parsed values and leave out NULL values and the associated field
~~ label.
Just create the table such that it allows NULL values!
~~ I can distinguish zero from undef but when I run the script using -w I
~~ get a warning for every test involving an undef value. Is there a way
~~ to do this so that no warnings are generated? Otherwise, I will need
~~ to run without the -w which everyone discourages.
~~
~~ This is the bit that does the compare:
~~
~~ for ($i=0; $i<@headers-1; $i++) {
~~ # only include if col's value non-NULL
~~ if ( ($data[$i]) || ($data[$i] eq '0') ){ # warning here
~~ $sql_insert .= $headers[$i] . ",";
~~ $sql_temp .= "'" . $data[$i] . "',";
~~ }
~~ }
Perhaps you want to use the 'defined' function....
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: Wed, 27 Oct 1999 17:58:14 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: quite and dirty date conversion
Message-Id: <MPG.12813f80ce6b798198a144@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <7v81eb$mh6@news-central.tiac.net> on 27 Oct 1999 23:21:47
GMT, Vladimir Gershkovich <vlad@tiac.net> says...
> I've been struggling for some today on what should be an easy thing
> to do - covert ONE date_time format to another using standard POSIX
> strftime module.. (no Date::Manip CPAN module).
>
> From format: "Mon Nov 17 13:35:04 1997"
> To format: "1997/11/17 17:35:04"
Let's assume that by '17:35:04' you really mean '13:35:04'.
...
> Any bright ideas/pointers/solutions?
There are several very easy ways to do this. Here is one of them:
#!perl -w
use strict;
my $date = 'Mon Nov 17 13:35:04 1997';
my ($month, $day, $time, $year) = (split ' ', $date)[1 .. 4];
my $out = sprintf '%d/%.2d/%.2d %s' => $year,
1 + index('JanFebMarAprMayJunJulAugSepOctNovDec', $month)/3,
$day, $time;
print "$out\n";
__END__
> P.S. if could directly email me, that would be much better.
Posting and emailing is much better.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 28 Oct 1999 01:10:07 GMT
From: bblishA@TblackbeltDO.Tcom (Ben Blish)
Subject: Re: Scripts that invoke one another via Location: and/or URI: - environment persistence?
Message-Id: <38179bc1.83921579@news.montanavision.net>
On Tue, 26 Oct 1999 15:23:11 -0700, Tom Phoenix <rootbeer@redcat.com> wrote:
>On Tue, 26 Oct 1999, Ben Blish wrote:
>
>> However, script1.pl has an environment that carries some
>> parameters from the HTML page that initiated it;
>> For example, such-and-such a button was pressed, or
>> such-and-such an item was selected from a dropdown list.
>>
>> I need to carry those parameters to the second CGI script
>> that I'll invoke with...
>
>It sounds as if you want a browser to make a certain request of a server.
>Perhaps you should search for the docs, FAQs, and newsgroups about
>servers, browsers, the protocols they use, and related issues.
Tom,
Thanks for replying.
A gentle reminder to read the docs. OK. I have been. I still am. The Perl
docs, specifically, don't really address this (probably becuase its
in a netherland between perl and cgi, but then again, they're *really*
bad docs, so maybe it's just because they're so badly done...)
I've been all over the net looking, also thru some Perl books and
sites. I have yet to find anyone talking about the incoming parameters as
they relate to (a) a query [?...etc] and (b) forms data from a button. I'm
new at this (as is very obvious, I should think) and I really *am* trying to
research things before I ask - I've spent about 50 hours on this one question
alone (so far) without any significant relief. I have 30 years of continuous
programming experience, so once pointed at the answer's location, I can
crank along pretty well. Usually, anyway, barring brainlock. :-) However,
when the context (PERL and CGI) itself is not solidly underneath one, the
apparent simplicity of finding something AND comprehending how it indirectly
or inherently relates to the question you're asking is an illusion.
All I want to know is how to (or if you can) stuff incoming parameters
into a service request (IE Location:...) so that it looks like it came
from a form - so the CGI script won't be concerned with a difference.
At this point, I'm looking at two intermediary scripts, one that grabs
'em from the form, then calls a further script with query data, and one
that grabs 'em from a script AS query data and then calls the same
further script with query data, thus the target script always gets the
data as query data and things are homogenous, more or less. Kind of.
I'm pretty sure it'll work, but it seems far less than elegant to me.
I know exactly what I want to get done. Finding the mechanism(s) is a
nightmare, one that is exacerbated by everything from the offhand "read
the man page" remarks to the absurd and ignorant remarks that are
scattered thru the Perl docs (like, counters are worthless... this
in context of the FAQ item about now to use flock() in writing
multiuser-safe data (counts) to and from files. Whoever wrote that
managed to demonstrate a myopic worldview that compares very
well with a number of socially-disdained groups and individuals
I can think of... I've even seen one poster say it in comp.lang.perl.misc
in the last few weeks, obviously as clueless as the writer of Perldocs...
He or she replied to a perfectly reasonable request for help with a
smart assed chunk for generating random numbers, an(other) infuriating example
of someone with a wealth of information and insufficient cognition.
Besides the plain fact that counters themselves are very useful in some
situtations I ccould name at the drop of a penguin's hat, there are
other cases where the essential mechanism of a counter are used to
support other worthwhile issues and procedures.)
I see my frustration is beginning to run off with my fingers, so...
Anyway, I was hoping that someone who knew would put the relevant details,
or a pointer to the relevant details, in a reply. That's all. I'm sure I'll
figure it out myself, eventually. I'm just trying to do that without
spending all my time till 2000 doing it. I'm pretty frustrated.
But cheers to you, too. :-) Frustration is not anger.
-Ben
>Cheers!
>
>--
>Tom Phoenix Perl Training and Hacking Esperanto
>Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
>
------------------------------
Date: Wed, 27 Oct 1999 20:44:13 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Scripts that invoke one another via Location: and/or URI: - environment persistence?
Message-Id: <Pine.GSO.4.10.9910272033150.29843-100000@user2.teleport.com>
On Thu, 28 Oct 1999, Ben Blish wrote:
> A gentle reminder to read the docs. OK. I have been. I still am. The
> Perl docs, specifically, don't really address this (probably becuase
> its in a netherland between perl and cgi, but then again, they're
> *really* bad docs, so maybe it's just because they're so badly
> done...)
I wouldn't say that. I'd say that the Perl docs don't cover everything
you'd want to do with CGI programming, in much the same way as the owner's
manual for a Mercedes-Benz doesn't tell very much about driving to
Disneyland.
Here's a general rule: If the problem can possibly be expressed without
mentioning Perl, the Perl docs aren't the best place to start looking for
the answer.
> All I want to know is how to (or if you can) stuff incoming parameters
> into a service request (IE Location:...) so that it looks like it came
> from a form - so the CGI script won't be concerned with a difference.
Sure, you can do that. (If I understand you correctly.) Many programming
languages - Perl among them - have the ability to send HTTP requests to
webservers. If you're doing this in Perl, you could use the LWP bundle
from CPAN.
> Besides the plain fact that counters themselves are very useful in some
> situtations I ccould name at the drop of a penguin's hat,
Sure, counters are useful. I have one in my kitchen that's handy for
holding up my toaster. :-) But the kind which say "you are visitor number
12345 to my web page" are useful only for impressing those who believe in
them, much like the Tooth Fairy.
Have fun with Perl!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 28 Oct 1999 03:00:51 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: several questions about perl
Message-Id: <D%OR3.186$z73.4674@nsw.nnrp.telstra.net>
On Wed, 27 Oct 1999 16:10:16 -0700,
David Cassell <cassell@mail.cor.epa.gov> wrote:
> Csaba Raduly wrote:
> >
> > Abigail wrote:
> > > Oh, and BTW, Lucifer used Java to create the hell.
> >
> > I doubt it. He wouldn't have much use of the
> > "Write once, run everywhere" slogan.
>
> I thought that the slogan was:
> "Write once, run reliably only on Suns and win32"
Try running Java on an Sun with the display set to a remote X
terminal.
Try running Java on a Sun that has no display attached to it, using
any of the Graphics APIs.
That leaves Win32.
Martien
--
Martien Verbruggen |
Interactive Media Division | We are born naked, wet and hungry.
Commercial Dynamics Pty. Ltd. | Then things get worse.
NSW, Australia |
------------------------------
Date: Wed, 27 Oct 1999 19:57:24 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Stored procedure with parameters.
Message-Id: <Pine.GSO.4.10.9910271956310.29843-100000@user2.teleport.com>
On Wed, 27 Oct 1999, SG wrote:
> $dbh = DBI->connect ("dbi:Sybase:server=name, $user, $pass,
> {RaiseError=>1,AutoCommit=>1});
> $sth = $dbh->prepare ("BEGIN sp_name(:1,:2); END;) or die "Error";
Are those quote marks doing what you really intend? Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 28 Oct 1999 03:16:02 GMT
From: mr_geek <shon@mad.scientist.com>
Subject: Re: uniq and perl
Message-Id: <7v8f5g$1f2$1@nnrp1.deja.com>
In article <MPG.1280f9ecd981f4fd98a142@nntp.hpl.hp.com>,
Larry Rosler <lr@hpl.hp.com> wrote:
> GMT, mr_geek <mr_geek@my-deja.com> says...
> > I want to know how I can (within perl) manipulate my output to print
> > only 1 occurence of a string (exactly like UNIX's uniq).
>
> `perldoc -q uniq` would have come up with the following FAQ:
>
> perlfaq4: "How can I extract just the unique elements of an array?"
>
Thanks to both Larry Rosler and Tom Phoenix. I also changed my header :)
Shon
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 27 Oct 1999 20:13:05 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: What makes the web go?
Message-Id: <slrn81f8o3.66b.abigail@alexandra.delanet.com>
Randal L. Schwartz (merlyn@stonehenge.com) wrote on MMCCXLVIII September
MCMXCIII in <URL:news:m1k8o8ub1z.fsf@halfdome.holdit.com>:
-- >>>>> "Master" == Master The Web <jjklimeck@home.com.com> writes:
--
-- Master> What programming language powers sites like amazon, or
-- Master> yahoo?
--
-- Master> Is it all perl/cgi? with some database stuff?
--
-- Mostly, yes. Amazon.com uses Perl extensively in the back end,
-- although I think some of their front-end stuff is C++ for speed.
--
-- Yahoo was originally all prototyped in Perl/CGI, but now uses custom
-- servers (no CGI needed if the server does the serving :). They still
-- use Perl quite extensively for backend stuff. I see a few ".py" URLs
-- though, so perhaps they're also using some of that other-P-stuff.
Jeffrey is still doing Perlish things at Yahoo, isn't he?
-- Master> If so, what is that database stuff...sql server?
--
-- No, nobody doing the kind of volume that Yahoo or Amazon.com gets
-- could *ever* use M$ products. Most likely Oracle or Sybase instead.
-- (Seriously.)
Well. It should be said that M$'s SQL server and Sybase's ASE [1]
come from the same parent: Sybase SQL server 4.something.
I would be surprised if M$'s SQL wouldn't be able to handle to loads of
Yahoo or Amazon. Although they probably don't get the performance of
either Sybase or Oracle when it comes to raw speed; specially when
using 64 bit platforms with >8 CPUs.
Distributed.net is a site that handles huge amounts of rapidly changing
data. Speed for their webpages is a lesser concern than the actual data
processing. Their choice: Sybase and PHP.
[1] Adaptive Server Enterprise. Not to be confused with ASA, Adaptive
Server Anywhere, which is a different product. IIRC, Sybase bought
it, then adapted it. (From M$? That would be ironic....)
Abigail
--
tie $" => A; $, = " "; $\ = "\n"; @a = ("") x 2; print map {"@a"} 1 .. 4;
sub A::TIESCALAR {bless \my $A => A} # Yet Another silly JAPH by Abigail
sub A::FETCH {@q = qw /Just Another Perl Hacker/ unless @q; shift @q}
-----------== 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: Thu, 28 Oct 1999 02:53:00 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: What makes the web go?
Message-Id: <gUOR3.184$z73.4674@nsw.nnrp.telstra.net>
On 27 Oct 1999 20:13:05 -0500,
Abigail <abigail@delanet.com> wrote:
> Randal L. Schwartz (merlyn@stonehenge.com) wrote on MMCCXLVIII September
> MCMXCIII in <URL:news:m1k8o8ub1z.fsf@halfdome.holdit.com>:
>
> -- No, nobody doing the kind of volume that Yahoo or Amazon.com gets
> -- could *ever* use M$ products. Most likely Oracle or Sybase instead.
> -- (Seriously.)
>
> Well. It should be said that M$'s SQL server and Sybase's ASE [1]
> come from the same parent: Sybase SQL server 4.something.
\begin[very]{offtopic}
Yes, but ASE has come a long long way since version 4.9. It has come a
long long way since version 10 :) MS SQL hasn't had the same sort of
improvement to it's internals.
Besides that, MS SQL requires you to run their DOS based menu system
as well as your database server. The limitations of that menu system
and the hardware it can run on simply do not exist for ASE. In
practice, and maybe even theoretically, Randal is right. MS SQL can't get
near to the sort of performance that ASE or Oracle can provide, due to
OS and hardware constraints, and possibly due to internal architecture
as well. But I don't know that much about that last one.
> I would be surprised if M$'s SQL wouldn't be able to handle to loads of
> Yahoo or Amazon. Although they probably don't get the performance of
> either Sybase or Oracle when it comes to raw speed; specially when
> using 64 bit platforms with >8 CPUs.
\begin{rant}
*nod* They may be able to handle Yahoo. I don't know whether, given
enough hardware, MS SQL could perform well enough. But I know a few
things: The system would not be nearly as stable as Sybase on Solaris,
for example. And given the same investment, the latter would probably
outperform the MS solution by far. And if you then look at ASE on
Linux, which is a possibility as well nowadays, I don't think MS SQL
can come close to competing anymore. I don't have any figures to back
that up, just my experience. The few times we've been forced to do
something Microsoftish, it always turns out to be much more expensive
in the long run than a unix based solution. Especially if you count
downtime, and the salary of the person who has to sit next to the box
to press the reset button every time they see a blue screen.
\end{rant}
> [1] Adaptive Server Enterprise. Not to be confused with ASA, Adaptive
> Server Anywhere, which is a different product. IIRC, Sybase bought
> it, then adapted it. (From M$? That would be ironic....)
ASA was bought from Watcom, quite a while ago. I don't recall what the
product name was back then. But the current ASA is very different from
what was bought. The ASA developers have learned a lot from ASE, and
the other way around as well (hence many of the features in ASE 12).
\end{offtopic}
Martien
--
Martien Verbruggen |
Interactive Media Division | This matter is best disposed of from
Commercial Dynamics Pty. Ltd. | a great height, over water.
NSW, Australia |
------------------------------
Date: Wed, 27 Oct 1999 23:15:46 -0400
From: brian@smithrenaud.com (brian d foy)
Subject: Re: What makes the web go?
Message-Id: <brian-2710992315460001@39.new-york-71-72rs.ny.dial-access.att.net>
In article <s1ebahf4r0894@corp.supernews.com>, cberry@cinenet.net (Craig Berry) wrote:
>Master The Web (jjklimeck@home.com.com) wrote:
>: What programming language powers sites like amazon, or
>: yahoo?
>Experimenting with Perl CGI apps would certainly be a wise course.
>Whether or not you end up using these technologies, you'll learn a lot
>about the underlying mechanisms of the web which will serve you well with
>any technology you choose.
although CGI might be an interesting place to start, it's not what
you want to be doing for a high traffic site. mod_perl, servlets,
or other such technologies are a lot better. mod_perl and Apache::DBI
are just about the best things in the world ;)
--
brian d foy
Perl Mongers <URI:http://www.perl.org>
CGI MetaFAQ
<URI:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
------------------------------
Date: Wed, 27 Oct 1999 18:04:12 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Why does this print 'bar'?
Message-Id: <MPG.128140e9528b9fa298a145@nntp.hpl.hp.com>
In article <Pine.GSO.4.10.9910272025580.2694-100000@crusoe.crusoe.net>
on Wed, 27 Oct 1999 20:27:27 -0400, Jeff Pinyan <jeffp@crusoe.net>
says...
...
> $s = ($n == 1) ? 'foo' : 'bar';
I'm tired of seeing those superfluous parentheses in every single one of
the four answers posted so far. The precedence of ?: is just higher
than that of assignment. However, as they say, "No harm, no foul."
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 27 Oct 1999 21:37:01 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Why does this print 'bar'?
Message-Id: <x7904oe05e.fsf@home.sysarch.com>
>>>>> "LR" == Larry Rosler <lr@hpl.hp.com> writes:
>> $s = ($n == 1) ? 'foo' : 'bar';
LR> I'm tired of seeing those superfluous parentheses in every single one of
LR> the four answers posted so far. The precedence of ?: is just higher
LR> than that of assignment. However, as they say, "No harm, no foul."
i was actually glad to see them. i know the precedence of ?: works fine
without them but this is one case where i use parens for the visual
separation of the conditional. just a (good) habit of mine, like using
{} in all c conditionals and loops (i hate dangling statements). just
because a syntax allows something doesn't mean it makes for better code
for humans to read.
uri (back afer a week in santas fe and barbara)
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Thu, 28 Oct 1999 02:58:57 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Why does this print 'bar'?
Message-Id: <RZOR3.185$z73.4674@nsw.nnrp.telstra.net>
On Wed, 27 Oct 1999 18:04:12 -0700,
Larry Rosler <lr@hpl.hp.com> wrote:
> In article <Pine.GSO.4.10.9910272025580.2694-100000@crusoe.crusoe.net>
> on Wed, 27 Oct 1999 20:27:27 -0400, Jeff Pinyan <jeffp@crusoe.net>
> says...
>
> ...
>
> > $s = ($n == 1) ? 'foo' : 'bar';
>
> I'm tired of seeing those superfluous parentheses in every single one of
> the four answers posted so far. The precedence of ?: is just higher
> than that of assignment. However, as they say, "No harm, no foul."
Two reasons why I always include them:
1) It's visually much clearer what is going on
2) I program a lot in C. They're mandatory there
I don't believe in leaving out brackets and/or other separation
characters just to get a slightly shorter line of code. Some of the
perl golf here makes me shudder, especially when people start leaving
out spaces to get a shorter line. Any production code I have will have
many superfluous visual guides in the code. If that is a problem, then
you may as well not use spaces or indents, or even newlines at all.
Just like you may be tired of seeing the superfluous parenthese, I am
tired of reading code that is badly formatted, or where people haven't
bothered making code easy to read. To me that's more important. And I
might as well give the right example, then :)
Rereading that, I realise it sounds a bit annoyed/irritated/whatever.
That wasn't my intent. But I'm not gonna change it either :)
Martien
--
Martien Verbruggen |
Interactive Media Division | Never hire a poor lawyer. Never buy
Commercial Dynamics Pty. Ltd. | from a rich salesperson.
NSW, Australia |
------------------------------
Date: Wed, 27 Oct 1999 19:55:08 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Why extra junk at end of new file?
Message-Id: <Pine.GSO.4.10.9910271947350.29843-100000@user2.teleport.com>
On Wed, 27 Oct 1999, Jon wrote:
> It's happening right when I close the file... arghhh... After the
> close completes, it's too big. Before the close completes, it's fine.
Have you seen this by stepping through the code in the debugger? Of
course, there may be some text in the buffer, unless you've forced
flushing.
> Anyway, I ran it as a normal script (NOTvia web server Apache) and it
> still screws up. And, I know I'm the only one working on this file
> right now.
Good, that's another dead end eliminated.
To be sure that you haven't somehow forked another process, you could use
the debugger. Just before closing the file (while it still seems to be
correct), use something like this debugger command (including the pipe
character). You may use options to your ps command, of course.
|x `ps`
Now you can see whether there's some mystery process out there. Also, you
can double-check that the data on disk do change at the time of the close.
(If you forced flushing, that shouldn't be happening, of course.)
I encourage you to try again to cut down the code to a manageable example.
The error will probably become apparent along the way.
Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
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 1207
**************************************
