[8222] in Perl-Users-Digest
Perl-Users Digest, Issue: 1840 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Feb 9 17:16:19 1998
Date: Mon, 9 Feb 98 14:00:26 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 9 Feb 1998 Volume: 8 Number: 1840
Today's topics:
Re: "Mastering Regular Expressions" lusol@turkey.cc.Lehigh.EDU
Re: "Mastering Regular Expressions" (Ilya Zakharevich)
Re: "Mastering Regular Expressions" <adaiwc@aud.alcatel.com>
Re: array question <barnett@houston.Geco-Prakla.slb.com>
Re: array question (Martin Vorlaender)
Re: array question <tchrist@mox.perl.com>
Binary Search Trees <olm@mail1.csun.edu>
Re: creating new file with perl (Steve Rawlinson)
Re: Don't use signal handlers (was Re: Child processes) <eryq@zeegee.com>
Re: Forgery => Killfile (Sitaram Chamarty)
Re: Fork/Threads (Steve Rawlinson)
Re: getting rid of duplicate lines in a file <xxTony.Curtis@vcpc.univie.ac.at>
Re: getting rid of duplicate lines in a file <dgoddard@us.oracle.com>
Help <guoguang@alfa.mbb.ki.se>
Re: How can I pattern match a dos formated string (ctrl <*@qz.to>
How do I export environment variables? <bwishon@adobe.com>
Pattern matching using * wildcard how? (Sylvain Juneau)
Re: Perl <--> ODBC. <dgoddard@us.oracle.com>
Re: Perl documentation (was re: Perl Year 2000 ...) (Ilya Zakharevich)
perl5.004_04: make depend infinite loop (Steve Rawlinson)
Re: Quickie: regexp for valid e-mail addresses (Craig Berry)
Re: returning the date <wd@denx.muc.de>
Re: Sending a message to a pager <jsd@hudsucker.gamespot.com>
Re: Sorting some text in Perl (Martin Vorlaender)
Re: Sorting some text in Perl (Craig Berry)
Re: Word -> HTML (Byron Weber Becker)
Re: Year 2000 Compliance: Lawyers, Liars, and Perl (Craig Berry)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 9 Feb 1998 19:46:58 GMT
From: lusol@turkey.cc.Lehigh.EDU
Subject: Re: "Mastering Regular Expressions"
Message-Id: <6bnmfi$t9q@fidoii.cc.Lehigh.EDU>
John Goerzen <jgoerzen@southwind.net> wrote in article <r6zwwf47fif.fsf@peridot.southwind.net> :
..
>
>Advanced is also the only publication of any sort that I've ever seen
>that has a good Perl-Tk reference.
Although not a publication, goto CPAN and examine this:
CPAN/authors/Stephen_O_Lidie/ptkref-402.003.0.tar.gz
------------------------------
Date: 9 Feb 1998 20:23:30 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: "Mastering Regular Expressions"
Message-Id: <6bnok2$kk$2@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Calle Dybedahl
<qdtcall@esb.ericsson.se>],
who wrote in article <ishg68vp34.fsf@godzilla.kiere.ericsson.se>:
> [1] For example, it points out the one case in which $`$&$' isn't
> equivalent to the string matched on. I would never in a million
> years have thought of it, but Jeffrey Friedl did, commenting that
> you will almost certainly never encounter it but that he thought
> that he should mention it just for completeness.
I do not remember seeing this bug mentioned before. Is it fixed in
newer version? Or is it a feature?
Ilya
------------------------------
Date: Mon, 09 Feb 1998 14:46:07 -0600
From: "Bill C. Adair" <adaiwc@aud.alcatel.com>
Subject: Re: "Mastering Regular Expressions"
Message-Id: <34DF6B0F.EC4950BD@aud.alcatel.com>
One can never have too many books. Buy them both.
William Adair
------------------------------
Date: Mon, 09 Feb 1998 14:19:20 -0600
From: Dave Barnett <barnett@houston.Geco-Prakla.slb.com>
Subject: Re: array question
Message-Id: <34DF64C8.8B770477@houston.Geco-Prakla.slb.com>
Jahnel Klaus wrote:
>
> is it possible to delete all values of an array so that the array is
> empty?
Yes.
How about @array = (); ?
That should empty @array.
@array = undef; also works
> Klaus
--
"Security through obscurity is no security at all."
-comp.lang.perl.misc newsgroup posting
------------------------------------------------------------------------
* Dave Barnett U.S.: barnett@houston.Geco-Prakla.slb.com *
* DAPD Software Support Eng U.K.: barnett@gatwick.Geco-Prakla.slb.com *
------------------------------------------------------------------------
------------------------------
Date: Mon, 09 Feb 1998 21:51:52 +0100
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: array question
Message-Id: <34df6c68.524144494f47414741@radiogaga.harz.de>
Jahnel Klaus (jahnel@xarch.tu-graz.ac.at) wrote:
: is it possible to delete all values of an array so that the array is
: empty?
How about @array = (); ?
cu,
Martin
--
| Martin Vorlaender | VMS & WNT programmer
Ceterum censeo | work: mv@pdv-systeme.de
Redmondem delendam esse. | http://www.pdv-systeme.de/users/martinv/
| home: martin@radiogaga.harz.de
------------------------------
Date: 9 Feb 1998 21:16:15 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: array question
Message-Id: <6bnrmv$iif$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, jahnel@xarch.tu-graz.ac.at writes:
:is it possible to delete all values of an array so that the array is
:empty?
Certainly; several mechanisms are documented in the standard perldata
manpage. You must have missed them -- I suggest you reread it.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
X-Windows: Warn your friends about it.
--Jamie Zawinski
------------------------------
Date: Mon, 09 Feb 1998 12:42:56 -0800
From: Ovanes Manucharyan <olm@mail1.csun.edu>
Subject: Binary Search Trees
Message-Id: <34DF6A50.332A3FBC@mail1.csun.edu>
Is there any way to implement Binary Search Trees or AVL Trees in Perl.
There must be a package around there that does this right?
And also, how efficient is this algorithm compared to ones in C.
--
----------------------------------------------------
Ovanes Manucharyan olm@csun.edu
California State University, Northridge
----------------------------------------------------
------------------------------
Date: Mon, 09 Feb 1998 21:48:04 GMT
From: steve@clara.net (Steve Rawlinson)
Subject: Re: creating new file with perl
Message-Id: <34df7829.196689112@eros.clara.net>
>I've been using
> system "touch emailaddress.com";
>
>but this only works if I run the script inside the server, after I've
>telneted... It doesn't work when I run the script from the browser.
Its probably a path or permission problem or both but you might want
to try using
open(Out, ">>filename") ;
close Out ;
instead since this is what touch does anyway. Remember the web daemon
user will need write permission in the directory you're creating these
files in.
steve
--
Steve Rawlinson
ClaraNet Ltd
steve@clara.net
0171 903 3000
------------------------------
Date: Thu, 05 Feb 1998 17:50:00 -0500
From: Eryq <eryq@zeegee.com>
To: chip@pobox.com
Subject: Re: Don't use signal handlers (was Re: Child processes)
Message-Id: <34DA4218.64C4@zeegee.com>
Chip Salzenberg wrote:
>
> According to abigail@fnx.com:
> >But I don't want to write in C. The choice wouldn't be
> >(Perl + C) or (Language X + C) but (Perl + C) or (Language X).
>
> Well, without Larry's approval for the safe signals patch, I'm stuck.
> --
Is there any way to massage Perl's internals so that the
difference between your patched code and Perl's existing code
is isolated to a single function? For example:
void perl_do_signal_fast(...); /* old way */
void perl_do_signal_safe(...); /* Chip's way */
Then perhaps, loading a special pragmatic...
use safe_signals;
...would bump some libperl function-pointer to point at the
appropriate one to use. Or bump a boolean to indicate
the same. I'm blue-skying here, but... couldn't we just
have the best of both worlds? :-)
--
___ _ _ _ _ ___ _ Eryq (eryq@zeegee.com)
/ _ \| '_| | | |/ _ ' / President, Zero G Inc: http://www.zeegee.com
| __/| | | |_| | |_| | "Talk is cheap. Let's build." - Red Green.
\___||_| \__, |\__, |___/\ Visit STREETWISE, Chicago's newspaper by/
|___/ |______/ of the homeless: http://www.streetwise.org
To reply, please replace the "@" in my address with an "@". I love spam!
------------------------------
Date: 9 Feb 1998 21:31:50 GMT
From: sitaram@diac.com (Sitaram Chamarty)
Subject: Re: Forgery => Killfile
Message-Id: <slrn6dutkf.fd.sitaram@ltusitaram.unidata.com>
On 9 Feb 1998 02:22:26 GMT, Gabor <gabor@vmunix.com> wrote:
>In comp.lang.perl.misc, Tom Christiansen <tchrist@mox.perl.com> wrote :
># People who forge their return address will not receive my
># help. In fact, you will be killfiled. I'm not going to
># argue about it -- it's what I'm doing. If you don't like
># it, don't forge. I use spam filters, and so can you.
>
>I agree. I can't comprehend why people feel this need for forging
>their address. I reject all spam and it's rare that I accidently send
>something to /dev/null that doesn't belong there.
And when that "rare" thing happens, what do you do?
And *I* cant comprehend why this is such a big deal. IMO "Mail-Copies-To"
should default to "Never" when the header isnt present in a post - why in
blazes should a post beget an email? "post in - post out, email in - email
out" computes. "post in - email out" doesn't - to me anyway.
(Now if someone *asks* for an email reply - I agree with you - they shouldnt
munge).
[ I seem to have missed Tom's original post, so the rest of this post is
for Tom. I have a known bad newsfeed, and this happens once in a while.
Not enough that I need to be Cc'd on a response, though :-) ]
I used to munge my address during the days I was using Windows. I know many
people who cannot use procmail or similar tools - that's just the way they
are. (For instance: my son is 7 now. Soon he'll get to the age where AOL
will be a good choice for his homework, projects, etc. At that time, if
I decide I cannot afford TWO ISPs, I might get an aol address).
IIRC all this has come up before, starting from you. I only lurked at that
time, but I seem to remember some (heated?) discussion.
Why are you bringing it up again? Did your killfile fail and force you to see
some "address-munged" posts?
If you have to be elitist, at least be *quiet*ly elitist. Talking about it
only makes you seem childish.
I hope all the "P+++++" people are not like that. I see that Eli at least is
not, and I have a feeling Randal isn't, so there is some hope.
Sitaram
-------
feeling kinda sad, cause I certainly owe you (Tom) quite a bit..
------------------------------
Date: Mon, 09 Feb 1998 21:20:43 GMT
From: steve@clara.net (Steve Rawlinson)
Subject: Re: Fork/Threads
Message-Id: <34df72cb.195314447@eros.clara.net>
>I've tried fork() from the Camel book, but it forks the entire script, and not
>just the code I want it to (I get the intro message multiple times). I know
>threads are going to be part of 5.005, but I want to "fake" implementation
>now.
Try forking *after* the bit that writes the intro ? ;)
Might want to have a look at flock() too to avoid getting jumbled
output.
steve
--
Steve Rawlinson
ClaraNet Ltd
steve@clara.net
0171 903 3000
------------------------------
Date: 09 Feb 1998 21:35:40 +0100
From: Remove xx to reply <xxTony.Curtis@vcpc.univie.ac.at>
To: tim@hcirisc.cs.binghamton.edu
Subject: Re: getting rid of duplicate lines in a file
Message-Id: <7xlnvk8qjn.fsf@beavis.vcpc.univie.ac.at>
Re: getting rid of duplicate lines in a file, Tim
<tim@hcirisc.cs.binghamton.edu> said:
Tim> How would you go about getting a perl script to remove
Tim> all duplicate lines in a file? I basically want to do
Tim> the equivalent of `cat filename | uniq > filename` but
^^^^
Perl buzz-word alert! Whoop! Whoop!
If you find yourself thinking about duplicates and
uniqueness, then you'll want to use a hash to see if
something has already been processed.
while (...) {
next if $cached{$key};
$cached{$key} = 1;
...
}
perl, i lieb di,
hth,
tony
------------------------------
Date: Mon, 09 Feb 1998 13:08:05 -0800
From: Denis Goddard <dgoddard@us.oracle.com>
Subject: Re: getting rid of duplicate lines in a file
Message-Id: <34DF7035.F6FCFCC5@us.oracle.com>
Tim Gray wrote:
>
> How would you go about getting a perl script to remove all duplicate
> lines in a file? I basically want to do the equivalent of
> `cat filename | uniq > filename` but since this will be in perl for
> win32 I can't do it that way. Thanks.
Good that you are looking to do it platform-independently.
One Way (there are Others, ya know):
#
open(FILEH,"<$filename") || die "open: $!";
@file_contents=<FILEH>;
and then see
perlfaq4 "How can I extract just the unique elements of an array?"
HTH,
-Denis (slowly getting the gist of things....:)
--
__ __ _ __ __
~~~~(__)|-< /-\(__ |__(-_ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Denis Goddard, Senior Member, Tech. Staff |"I see the heads of men arise
email: dgoddard@us.oracle.com |with hungry minds and open eyes!"
ourworld.compuserve.com/homepages/d_goddard| -Rush, from 2112: _The Oracle_
------------------------------
Date: Mon, 9 Feb 1998 17:44:08 GMT
From: Guoguang Lu <guoguang@alfa.mbb.ki.se>
Subject: Help
Message-Id: <34DF4068.B60@alfa.mbb.ki.se>
Hi,
I am a structural biologist who know a bit PERL. I wonder if I could use
PERL do the following things:
1) If there is a Web address openned to public, could I write the data
directly to an file instead of display on the Netscape screen (or MS
exploer)? If yes, how?
2) If there is an anonymous ftp site, and I want to ftp an specialfic
file from that site, does PERL allows to do it automatically? if yes
how?
I would appreciate helps to my e-mail address guoguang@alfa.mbb.ki.se
best regards
Guoguang
--
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Guoguang Lu, PhD, Research Scientist
Division of Molecular Structural Biology
Department of Medical Biochemistry and Biophysics
Doktorsringen 9A1
Karolinska Institute
17177 Stockholm
Sweden
---------------------------------------------------------------------
Phone: (int+46)-8-728 7651(o) Email: guoguang@alfa.mbb.ki.se
Fax: (int+46)-8-327626 Homepage: http://gamma.mbb.ki.se/~guoguang
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
------------------------------
Date: 9 Feb 1998 20:23:25 GMT
From: Eli the Bearded <*@qz.to>
Subject: Re: How can I pattern match a dos formated string (ctrl-m chars)
Message-Id: <qz$9802091500@qz.little-neck.ny.us>
Bhanu P. Suravarapu <bhanu@usl.edu> wrote:
(sample text moved to in script below)
> I am interested in getting the rows of this table using the first row
> as the pattern to look for in a given table.
> i.e, I need to get
> <tr>^M
> <td>BAY 3901</td><td>GLUCOMETER ELITE DIABETES CARE
> SYSTEM</td><td>$130.00</td><
> td><a href="./3901"><b><i>DETAILS</b></i></a></td> ^M
> </tr>^M
> <tr>^M
> <tr>^M
> <td>BMC 00860</td><td>ACCU-CHEK ADVANTAGE DIABETES CARE
> KIT</td><td>$90.00</td><
> td><a href="./00860"><b><i>DETAILS</b></i></a></td> ^M
> </tr>^M
>
> using the pattern
>
> <table border>^M
> <tr>^M
> <td>CATALOG #</td><td>DESCRIPTION</td><td>PRICE</td>^M
> </tr>^M
How is the end of the match indicated?
> Can this be done.
Of course. Knowing that you can write <ctrl-M> as "\cM" may help you:
#!/perl -w
($_ = <<'EOT') =~ s/\^M/\cM/g;
<table border>^M
<tr>^M
<td>CATALOG #</td><td>DESCRIPTION</td><td>PRICE</td>^M
</tr>^M
<tr>^M
<td>BAY 3901</td><td>GLUCOMETER ELITE DIABETES CARE
SYSTEM</td><td>$130.00</td><
td><a href="./3901"><b><i>DETAILS</b></i></a></td> ^M
</tr>^M
<tr>^M
<tr>^M
<td>BMC 00860</td><td>ACCU-CHEK ADVANTAGE DIABETES CARE
KIT</td><td>$90.00</td><
td><a href="./00860"><b><i>DETAILS</b></i></a></td> ^M
</tr>^M
</table>
EOT
($re = <<'EORE') =~ s/\^M/\cM/g;
<table border>^M
<tr>^M
<td>CATALOG #</td><td>DESCRIPTION</td><td>PRICE</td>^M
</tr>^M
EORE
($line,$next) = m/$re(.*)\n(.*)/;
print "First line of the match is: $line\n";
print "Second line of the match is: $next\n";
__END__
:w|r! perl -x %
First line of the match is: <tr>
Second line of the match is: <td>BAY 3901</td><td>GLUCOMETER ELITE DIABETES CARE
Elijah
------
or I could be clever and tell you to strip the ^Ms from your text
------------------------------
Date: Mon, 09 Feb 1998 12:17:01 -0800
From: William Wishon <bwishon@adobe.com>
Subject: How do I export environment variables?
Message-Id: <34DF643D.41F17363@adobe.com>
At the end of a config script I wrote I would like to export my
environment variables. I want the perl script to leave the environment
of the shell it's running in different than when it started. Then other
commands executed from the shell that executed the perl script can use
the modified environment variables.
-Bill
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
: William V. Wishon : There is so much good in the worst of us, :
: Release Engineer : So much bad in the best of us, :
: Adobe Systems Inc. : That it scarcely behooves any of us :
: bwishon@adobe.com : To talk about the rest of us. -S.Jorth :
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
------------------------------
Date: Mon, 09 Feb 1998 21:09:43 GMT
From: sjuneau@microtec.net (Sylvain Juneau)
Subject: Pattern matching using * wildcard how?
Message-Id: <34e06fca.166861@news.cmc.ec.gc.ca>
I have this file :
emask A700*P
imask *P dbim 2 Y food/cis dbadd
imask *C dbim 2 Y food/cis dbadd
I have another file. I open that file and I want to search in it:
A700*P where I want to have * to be a wildcard so that it can have
any value (abcdef.....12345....)
then I would like same for *P and *C.
My question is how do I search through this file using a wildcard?
I assume you use a pattern matching but how???
Thank you very much
Sylvain
e-mail sjuneau@microtec.net
------------------------------
Date: Mon, 09 Feb 1998 11:49:12 -0800
From: Denis Goddard <dgoddard@us.oracle.com>
To: paul@u-netsys.com.br
Subject: Re: Perl <--> ODBC.
Message-Id: <34DF5DB8.5DDC5737@us.oracle.com>
Paulo C. Marques F. wrote:
>
> I use DBI. But to use DBD-ODBC I probably
> need an ODBC driver for my FreeBSD client box. Is there
> any Freeware ODBC driver to do this Perl5 / FreeBSD / ODBC
Prereading (which you prolly already read, but just to be sure):
http://www.hermetica.com/technologia/perl/DBI/
(and ready every link thereunder :)
Your specific question:
DBI-users mailing list archives, search for 'free ODBC':
http://outside.organic.com/mail-archives/dbi-users/
Also check the FreeODBC pages:
http://users.ids.net/~bjepson/freeODBC/
Hope this helps!
-Denis
--
__ __ _ __ __
~~~~(__)|-< /-\(__ |__(-_
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Denis Goddard, Senior Member Technical Staff|"I see the heads of men arise
email: dgoddard@us.oracle.com |with hungry minds and open
eyes!"
ourworld.compuserve.com/homepages/d_goddard | -Rush, from 2112: _The
Oracle_
------------------------------
Date: 9 Feb 1998 20:12:53 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Perl documentation (was re: Perl Year 2000 ...)
Message-Id: <6bno05$kk$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Ben Coleman
<bcoleman@mindspring.com>],
who wrote in article <ulpouawgelqyqla.pminews@user-38lclso.dialup.mindspring.com>:
> On 8 Feb 1998 00:47:59 GMT, Craig Berry wrote:
>
> >That's one reason it's better to use the perldoc command (rather than
> >man) to view perl documentation; you can get doc on a single function by
> >doing e.g. 'perldoc -f length'.
>
> Is it intended that perldoc -f <function> doesn't page its output, or
> is that just a problem with the OS/2 port?
It does. With 5.004_55 it will even if you do not have any pager
around (it uses `cmd /c more').
Ilya
------------------------------
Date: Mon, 09 Feb 1998 21:22:14 GMT
From: steve@clara.net (Steve Rawlinson)
Subject: perl5.004_04: make depend infinite loop
Message-Id: <34df737c.195491525@eros.clara.net>
I'm sure this problem has been discussed before but cannot remember
the conclusion.
Installing perl 5.004_04 on freebsd 2.2.5. Configure -d works as
normal until the 'make depend' which hits a loop as follows:
thanatos:[/usr/local/src/perl/perl5.004_04]# make depend
sh ./makedepend.SH
Extracting makedepend (with variable substitutions)
sh ./makedepend MAKE=make
sh ./makedepend.SH
Extracting makedepend (with variable substitutions)
make depend MAKEDEPEND=
sh ./makedepend.SH
Extracting makedepend (with variable substitutions)
sh ./makedepend MAKE=make
sh ./makedepend.SH
Extracting makedepend (with variable substitutions)
make depend MAKEDEPEND=
sh ./makedepend.SH
Extracting makedepend (with variable substitutions)
[...]
Same version of perl on another freebsd machine works fine.
Any suggestions?
steve
--
Steve Rawlinson
ClaraNet Ltd
steve@clara.net
0171 903 3000
------------------------------
Date: 9 Feb 1998 21:12:22 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Quickie: regexp for valid e-mail addresses
Message-Id: <6bnrfm$kr2$1@marina.cinenet.net>
Bart Lateur (bart.mediamind@tornado.be) wrote:
: Tom Phoenix <rootbeer@teleport.com> wrote:
:
: >Unfortunately, when I tried writing to him to ask what his email address
: >is, I uncovered a bug in my mail program, which is unable to handle
: >addresses which are infinitely long. As soon as I get that bug fixed, I'll
: >let you know what he says.
:
: Huh? You tried sending an e-mail message to somebody, asking about his
: e-mail address?
I can't think of a more Goedelian way to go about the problem, really.
(Perhaps I need to bring that 'echo "Ceci n'est pas un pipe" | lpr' .sig
out of retirement...)
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: Mon, 9 Feb 1998 18:14:03 GMT
From: Wolfgang Denk <wd@denx.muc.de>
Subject: Re: returning the date
Message-Id: <Eo4InF.7yA.7.denx@denx.muc.de>
Tom Christiansen <tchrist@mox.perl.com> writes:
>Personally, I've always like 23-Apr-1998, or the Spanish style of
>23-IV-1998. But the former is surely offensive to someone, and the
>latter is surely offensive to someone else. :-(
How about 1998-04-23 then? At least this can be easily used to sort
the names in chronological order...
Wolfgang
Phone: (+49)-89-95720-110 Fax: (+49)-89-95720-112 wd@denx.muc.de
Office: (+49)-89-722-27328 wd@uebemc.siemens.de
There is is no reason for any individual to have a computer in their
home. -- Ken Olsen (President of Digital Equipment Corporation),
Convention of the World Future Society, in Boston, 1977
------------------------------
Date: 9 Feb 1998 20:05:39 GMT
From: Jon Drukman <jsd@hudsucker.gamespot.com>
Subject: Re: Sending a message to a pager
Message-Id: <6bnnij$k7a$1@its.hooked.net>
team lamer <spam@fritter.com> wrote:
: (We use BT's 'Easy reach alpha' system -yuk)
get a pager that receives email. mine does. see
http://www.airnote.net/
this has the added advantage that your scripts can page people and
also send the same information to a normal mailbox with a minimum of
effort.
-j-
------------------------------
Date: Mon, 09 Feb 1998 22:00:00 +0100
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: Sorting some text in Perl
Message-Id: <34df6e50.524144494f47414741@radiogaga.harz.de>
Johan Larsson (jola@acc.umu.se) wrote:
: How can I sort a @text list in Perl containing strings like "9801"
: "9802" etc? (dates - oh yes!)
Hmmm... would you consider to use the sort() function ?
The perlfunc POD has details on how to use it.
cu,
Martin
--
| Martin Vorlaender | VMS & WNT programmer
Ceterum censeo | work: mv@pdv-systeme.de
Redmondem delendam esse. | http://www.pdv-systeme.de/users/martinv/
| home: martin@radiogaga.harz.de
------------------------------
Date: 9 Feb 1998 21:43:00 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Sorting some text in Perl
Message-Id: <6bnt94$kr2$3@marina.cinenet.net>
Honza Pazdziora (adelton@fi.muni.cz) wrote:
: Johan Larsson <jola@acc.umu.se> writes:
:
: > How can I sort a @text list in Perl containing strings like "9801"
: > "9802" etc? (dates - oh yes!)
:
: Check the man page perlfunc for a builtin function ... (wait, hmmmm,
: here it is) ... it's called sort.
...but beware of whatever system is generating dates encoded in that
form; it's a late entrant in the Y2K Disaster Sweepstakes. What happens
when, in 21 months, you start seeing "9911", "9912", "0001", "0002"?
That doesn't text-sort quite so well. My advice: either change the
underlying system to encode months as YYYYMM (e.g., "199802"), or write a
smart sorter which knows about Y2K and correctly sorts year 00 after 99.
The first option is obviously preferable.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: Mon, 9 Feb 1998 19:50:19 GMT
From: bwbecker@dragon.uwaterloo.ca (Byron Weber Becker)
Subject: Re: Word -> HTML
Message-Id: <34df5dd2.271646932@news.math.uwaterloo.ca>
On Wed, 04 Feb 1998 10:47:28 +0000, Patrick Stalder
<internet@reimer.ch> wrote:
>Cameron Dorey wrote:
>
>> scott@softbase.com wrote:
>> >
>> > Patrick Husi (patrick@husi.ch) wrote:
>> >
>> > > I'm looking for a converter from Word format (i.e. .doc files) to
>> > HTML, preferably for Perl or Java. Anyone ??
>> >
>> > I almost hate to say this, but ...
>> >
>> > IT IS BUILT INTO WORD! All you do is File/Save As HTML!
>> >
>>
>> Not Word 95, it isn't. You're thinking of Word 97 (which I, for one,
>> haven't seen the need to shell out *more* bucks for).
>>
>> What I do (swing around elbow, approach ear) is to use Corel WP 8 to
>> open the Word 95 doc, then print as HTML. Corel's translation program is
>> generally very good. I'm working on automating it, but haven't gotten
>> too far, yet.
>>
>> Cameron Dorey
>> camerond@mail.uca.edu
>
> I want to convert about 10,000 *.doc-files to HTML on the fly from a CGI
>script on the server side. This process must be repeated continuously and
>cannot be done inside a Word program etc.
>
rtftohtml is best I've seen. It requires the documents to
be saved first in RTF. Don't know how that fits with your
plans...
Byron
============================================================================
Byron Weber Becker e-mail: bwbecker@dragon.uwaterloo.ca
Dept. of Computer Science phone: (519)888-4567 x4661
University of Waterloo fax: (519)885-1208
Waterloo, ON Canada N2L 3G1 WWW: http://watdragon.uwaterloo.ca/~bwbecker/
------------------------------
Date: 9 Feb 1998 21:20:11 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Year 2000 Compliance: Lawyers, Liars, and Perl
Message-Id: <6bnrub$kr2$2@marina.cinenet.net>
Tom Christiansen (tchrist@mox.perl.com) wrote:
: I'm still thinking about the issue of people learning bad
: habits from the bad old days of Cobol.
I think the real issue isn't so much bad habits (though that's another
important topic), but rather bad data. As others have pointed out, a lot
of the data formats in production systems today trace their ancestry back
to the 1401 era. At no point has it made sense to take the massive hit in
expense and inconvenience to move terabits of data into a more modern
format. Thus, BCD and full-character encoding of dates and times is still
very much with us, despite the obvious relative superiority of storing a
time_t or julian day number (or whatever) in binary data.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 1840
**************************************
