[10000] in Perl-Users-Digest
Perl-Users Digest, Issue: 3593 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 31 04:04:11 1998
Date: Mon, 31 Aug 98 01:00:23 -0700
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, 31 Aug 1998 Volume: 8 Number: 3593
Today's topics:
Re: Better Regular Expressions (was: Re: Imagine... a n <mee@mine.com>
Re: Building Perl 5.004_xx under Linux (Alastair)
Re: comp.lang.perl.windows.misc (Chip Salzenberg)
GD.pm (EkimicraD)
Re: GD.pm <rootbeer@teleport.com>
How do you prompt a user for data? (Peter Bismuti)
Re: How do you prompt a user for data? <arunas@a!nm.org>
Re: How do you prompt a user for data? <maryesme@localaccess.com>
Re: How to convince others using perl instead bourne sc <nobody@nowhere.com>
Re: Imagine... a non-greedy world! <mee@mine.com>
Re: Imagine... a non-greedy world! <mds-resource@mediaone.net>
Re: Imagine... a non-greedy world! <rootbeer@teleport.com>
Re: new and with a lot of questions <nobody@nowhere.com>
Newbie RE Question <andrew@sunshine.co.nz>
Re: Newbie RE Question <rootbeer@teleport.com>
Re: Newbie to the LWP module (Bob Trieger)
opendir on UNC fails from browser in NT cbinder@lexmark.com
Perl and apache <lbali@dvc.edu>
Re: Perl Script to Retreve HTML Files from the Internet (Alastair)
Problem with Sockets on WindowsNT <Pekka_Kurki@intellectics.co.at>
Re: Question about RE (Mike Stok)
Re: Question about RE <rootbeer@teleport.com>
WWW Programmer - Miami, FL bubble@shadow.net
Re: Y2K Date Support (I R A Aggie)
Re: Y2K Date Support (Patrick Timmins)
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 31 Aug 1998 00:11:56 -0700
From: Mee <mee@mine.com>
Subject: Re: Better Regular Expressions (was: Re: Imagine... a non-greedy world!)
Message-Id: <35EA4CBC.E62DCA79@mine.com>
Tom,
I do not think that a "new and improved" RE should
start with commonly needed patterns as a foundation.
What is commonly needed today may not be commonly
needed tomorrow.
Take HTML for example. One could make a RE engine that
allows quick parsing of HTML (instead of the painstaking
tag/subtag, etc. decomposition and reassembly), but it
may not be worth the effort if the world (as expected)
moves to something better than HTML.
So, it may be better to start with common sense instead.
Mee
------------------------------
Date: Mon, 31 Aug 1998 00:30:22 GMT
From: alastair@calliope.demon.co.uk (Alastair)
Subject: Re: Building Perl 5.004_xx under Linux
Message-Id: <slrn6ujvb3.4k.alastair@calliope.demon.co.uk>
Eric Thompson <jet@accessone.com> wrote:
>I am having trouble building Perl under Linux. Evidently I am
>bombing out on libnet, which I did not have on my system and built
>successfully before attempting to run Configure.
What's 'libnet'? I don't seem to have it on my system at all (linux 2.0.34) and
I haven't had any problems building perl 5.004_4.
Some of the errors from 'libnet' look strange - 'java-like'.
--
Alastair
work : alastair@psoft.co.uk
home : alastair@calliope.demon.co.uk
------------------------------
Date: 31 Aug 1998 02:51:10 -0400
From: chip@pobox.com (Chip Salzenberg)
Subject: Re: comp.lang.perl.windows.misc
Message-Id: <6sdh4u$79l$1@cyprus.atlantic.net>
According to aml@world.std.com (Andrew M. Langmead):
> Also I think something is missing in the QDOS is derived from CP/M
> statement. MS-DOS's use of the forward slash as the option
> introducer implies something other than CP/M in its ancestry.
You are mistaken. I used M80, Microsoft's 8080 assembler for CP/M,
before there even *was* a PC-DOS. It used the forward slash as its
option character. So did other CP/M programs.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
"I brought the atom bomb. I think it's a good time to use it." //MST3K
-> Ask me about Perl training and consulting <-
Like Perl? Want to help out? The Perl Institute: www.perl.org
------------------------------
Date: Mon, 31 Aug 1998 02:15:27 GMT
From: EkimicraD@xxx.xxx (EkimicraD)
Subject: GD.pm
Message-Id: <35ea06c4.88960719@news.wgn.net>
Ok, I am not that good at perl, or probly unix, but her is my problem,
I downloaded gd.pm, seams to be a bunch of files, I cant compile them,
is there a realy simple way for me just to download a file, and stick
it in the same dir as my cgi's and be able to make an image counter?
Any help would help....Mike
------------------------------
Date: Mon, 31 Aug 1998 02:36:34 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: GD.pm
Message-Id: <Pine.GSO.4.02A.9808301935050.4619-100000@user2.teleport.com>
On Mon, 31 Aug 1998, EkimicraD wrote:
> I downloaded gd.pm, seams to be a bunch of files, I cant compile them,
Maybe you should see the FAQ's entry on installing modules.
> is there a realy simple way for me just to download a file, and stick
> it in the same dir as my cgi's and be able to make an image counter?
It sounds as if you need help with getting CGI programs to work. The docs,
FAQs, and newsgroups about CGI programs should be able to help you.
> Any help would help...
Now there's a tautology. Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 31 Aug 1998 04:07:24 GMT
From: bismuti@dirac.scri.fsu.edu (Peter Bismuti)
Subject: How do you prompt a user for data?
Message-Id: <6sd7hs$v$1@news.fsu.edu>
I have a few books on PERL, but I don't seem to be able to
find an example of how you can prompt a user for input.
In Fortran, if you type:
read(*,*) input
the program will pause until the user enters in a value
and hits the return key. How can I get the same
functionality out of perl?
_______________________________________________________________________
| Pete Bismuti |
| Supercomputer Computations Research Institute |
| Florida State University - Department of Mathematics |
| bismuti@scri.fsu.edu (904) 644-6263 |
|_____________________________________________________________________|
------------------------------
Date: Mon, 31 Aug 1998 00:00:54 -0600
From: "Arunas Salkauskas" <arunas@a!nm.org>
Subject: Re: How do you prompt a user for data?
Message-Id: <35ea3c12.0@news.cadvision.com>
Golly, which books do you have?
You should have the camel book, otherwise known as "Programming Perl" from
O'Reilly,
and the attendant "Learning Perl".
Page 14 of the former has:
print STDOUT "Enter a number: "; # prompt for a number
$number = <STDIN>; # wait for and get a number
print STDOUT "The number is $number\n"; # print it out again.
Hope that helps...
--
- Arunas Salkauskas
High Point Designs
http://www.highpointdesigns.com/
Peter Bismuti wrote in message <6sd7hs$v$1@news.fsu.edu>...
>
>I have a few books on PERL, but I don't seem to be able to
>find an example of how you can prompt a user for input.
>In Fortran, if you type:
>
> read(*,*) input
>
>the program will pause until the user enters in a value
>and hits the return key. How can I get the same
>functionality out of perl?
>
> _______________________________________________________________________
> | Pete Bismuti |
> | Supercomputer Computations Research Institute |
> | Florida State University - Department of Mathematics |
> | bismuti@scri.fsu.edu (904) 644-6263 |
> |_____________________________________________________________________|
------------------------------
Date: Sun, 30 Aug 1998 23:06:25 -0700
From: Mark Lybrand <maryesme@localaccess.com>
To: Peter Bismuti <bismuti@dirac.scri.fsu.edu>
Subject: Re: How do you prompt a user for data?
Message-Id: <35EA3D61.6D05@localaccess.com>
Peter Bismuti wrote:
>
> I have a few books on PERL, but I don't seem to be able to
> find an example of how you can prompt a user for input.
> In Fortran, if you type:
>
> read(*,*) input
>
$input = <>;
or if you want to be nitpicky:
$input = <STDIN>;
Mark :)
------------------------------
Date: Mon, 31 Aug 1998 13:25:59 +1000
From: Allan Chandler <nobody@nowhere.com>
Subject: Re: How to convince others using perl instead bourne scripts
Message-Id: <35EA17C7.A9C7BA4@nowhere.com>
dzuy@my-dejanews.com wrote:
>
> > In article <6s2jeo$1l1$1@nnrp1.dejanews.com>
> > dzuy@my-dejanews.com wrote:
> >
> > > Challenge him/her to write an sh script or C program that reads in
> > > a file, then re-arrange the lines randomly.
> > ...
> > > If stumped,
> > $ perl -i -al012n077 -F"\n" -e 'print splice(@F,int(rand(@F)),1) while $F[0]'
> file
while read; do
print "${RANDOM}:${REPLY}"
done | sort | cut -d: -f 2-
Hardly rocket science, that one, altho' I couldn't do it in one line
(without
introducing ^V^J sequences). Granted that's Korn shell as well
Perhaps it would be better using a feature which would be difficult to
do in sh such
as (for example) the tinyhttpd web server in about 100 lines of Perl
code (that's
WITHOUT CGI.pm).
AC
------------------------------
Date: Sun, 30 Aug 1998 17:10:42 -0700
From: Mee <mee@mine.com>
Subject: Re: Imagine... a non-greedy world!
Message-Id: <35E9EA02.9FDF96DE@mine.com>
Tom,
>> Please don't feed the troll. <<
Nice try, but no cigar.
Are you trying to tell us with this evasive maneuver
that you have nothing better to say?
Mee
------------------------------
Date: Sun, 30 Aug 1998 19:57:15 -0500
From: "Michael D. Schleif" <mds-resource@mediaone.net>
Subject: Re: Imagine... a non-greedy world!
Message-Id: <35E9F4EB.CBFC822A@mediaone.net>
If you do, dear Mee, please, be done with it and say it . . .
Mee wrote:
>
> Tom,
>
> >> Please don't feed the troll. <<
>
> Nice try, but no cigar.
>
> Are you trying to tell us with this evasive maneuver
> that you have nothing better to say?
>
> Mee
--
Best Regards,
mds
mds resource
888.250.3987
"Dare to fix things before they break . . . "
"Our capacity for understanding is inversely proportional to how much we
think we know. The more I know, the more I know I don't know . . . "
------------------------------
Date: Mon, 31 Aug 1998 01:04:56 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Imagine... a non-greedy world!
Message-Id: <Pine.GSO.4.02A.9808301803300.4619-100000@user2.teleport.com>
On Sun, 30 Aug 1998, Mee wrote:
> >> Please don't feed the troll. <<
>
> Nice try, but no cigar.
>
> Are you trying to tell us with this evasive maneuver
> that you have nothing better to say?
No, I think he (and others) are saying that _you_ have nothing more to
say. I was hoping you'd prove him wrong. Or right. :-)
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Mon, 31 Aug 1998 09:52:17 +1000
From: Allan Chandler <nobody@nowhere.com>
Subject: Re: new and with a lot of questions
Message-Id: <35E9E5B1.BE1F9881@nowhere.com>
stacy wright wrote:
>
> I've never used a usnet group before so beware fumbling steps. just got
> Linus v5, and perl 5 for dummies. i need some info to use group and my
> software,especially my perl v4 already resident in Linux and the perl 5
> that i've just aquired. help!!!!
Linus has a version 5? I remember reading an article where he described
his child as Linus v2 but I have to say that I'm impressed by his other
half if v5 is really available :-).
AC
------------------------------
Date: Mon, 31 Aug 1998 13:46:17 +1300
From: Andrew Campbell <andrew@sunshine.co.nz>
Subject: Newbie RE Question
Message-Id: <35E9F258.E23B71BA@sunshine.co.nz>
Is there any way of "deactivating" quantifiers in a regular expression? I am
working on a script that includes an RE that includes a couple of scalars, and
because these scalars sometimes include question marks it is not working,
presumably because the question marks are being interpreted as quantifiers
after interpolation. I have no control over the input, so I can't backslash
out the question marks.
Any ideas?
Andrew Campbell
Online Manager
=============================
S U N S H I N E O N L I N E
E-mail: andrew@sunshine.co.nz
Fax: +64 9 525 7904
Phone: +64 9 525 3575
URL: http://www.sunshine.co.nz
------------------------------
Date: Mon, 31 Aug 1998 02:21:09 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Newbie RE Question
Message-Id: <Pine.GSO.4.02A.9808301918240.4619-100000@user2.teleport.com>
On Mon, 31 Aug 1998, Andrew Campbell wrote:
> Is there any way of "deactivating" quantifiers in a regular
> expression? I am working on a script that includes an RE that includes
> a couple of scalars, and because these scalars sometimes include
> question marks it is not working,
Sounds as if you want quotemeta, or the \Q equivalent.
> I have no control over the input, so I can't backslash
> out the question marks.
You have no control over what someone sends your script, but you do have
control over what you do with the input once you've read it in.
Backwhacking those question marks should be within your abilities!
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Mon, 31 Aug 1998 03:52:39 GMT
From: sowmaster@juicepigs.com (Bob Trieger)
Subject: Re: Newbie to the LWP module
Message-Id: <6sd6sh$14h$1@ligarius.ultra.net>
[ posted to usenet and courtesy e-mail sent to <niting@raleigh.ibm.com>]
"Nitin Gupta" <niting@raleigh.ibm.com> wrote:
-> Is there a book/FAQ/instruction set somewhere which deals with the LWP
-> module and it's usage? I know there is a man page which comes but that is
-> too little (at least for me!) to learn the full functionality of the module.
-> I would appreciate if anyone could list any resources (books or on-line)
-> which deal with LWP.
The lwp cookbook is installed on the system with the lwp module.
Otherwise you can find it at:
http://www.perl.com/CPAN-local/doc/wwwman/libwww/lib/LWP.html
HTH
Bob Trieger
sowmaster@juicepigs.com
------------------------------
Date: Mon, 31 Aug 1998 01:51:01 GMT
From: cbinder@lexmark.com
Subject: opendir on UNC fails from browser in NT
Message-Id: <6scvi5$pn3$1@nnrp1.dejanews.com>
In Windows NT, I have a script that gets passed a UNC pathname and a file
extension. It searches the UNC pathname for the specified file(s).
When run from a browser, the script fails with "Permission Denied" at the
following line:
opendir(DIR, $directory) || die("$!: Unable to read from $directory");
This script works fine at a Command Prompt (in NT) and on Windows 98 running
PWS. I read something about impersonation, so I set the following metabase
property: ADSUTIL.VBS SET w3svc/1/root/scripts/CreateProcessAsUser "FALSE". I
also tried giving IUSR and IWAM adminstrator privileges. Nothing I've tried
has produced any result other than Permission Denied.
I'm not even sure WHICH account the browser is using... I have a script that
prints each environment variable. When run from a Command Prompt on the NT
machine, I have a USERNAME=Administrator (my current login) and USERPROFILE=C:
\WINNT\Profiles\Administrator. When run from a broswer, I have NO USERNAME,
but I do have USERPROFILE=C:\WINNT\Profiles\Default User.
How can I grant permission to the browser (and/or script) to open a directory
on another machine?
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sun, 30 Aug 1998 23:06:21 -0700
From: "Bali" <lbali@dvc.edu>
Subject: Perl and apache
Message-Id: <6sde9k$t0g$1@news.ncal.verio.com>
How do I get my new Unix Apache web server install to recognize perl
extensions? Do I type something in mime.types? What?
------------------------------
Date: Mon, 31 Aug 1998 00:27:00 GMT
From: alastair@calliope.demon.co.uk (Alastair)
Subject: Re: Perl Script to Retreve HTML Files from the Internet
Message-Id: <slrn6ujv4q.4k.alastair@calliope.demon.co.uk>
Vincent Lowe <vincent@compclass.com> wrote:
>
>#!/usr/dist/share/perl,v5.003/5bin.sun4/perl
^^^^^
Is that comma meant to be there?
--
Alastair
work : alastair@psoft.co.uk
home : alastair@calliope.demon.co.uk
------------------------------
Date: Mon, 31 Aug 1998 09:07:16 +0200
From: "Pekka K. Kurki" <Pekka_Kurki@intellectics.co.at>
Subject: Problem with Sockets on WindowsNT
Message-Id: <6sdhtg$lbj$1@fleetstreet.Austria.EU.net>
Hi!
I am using the latest available (ActiveState) alien port of Perl in NT. I
have
the following URGENT problem. Perhaps somebody could help...
I have written a server and a client for socket connection (based on
examples
available on net.) The server works OK,
> The socket client program (listen below) does not connect to a serve ron a
> remote node. It workd without problems on the local node but as
> soon as the
> computer to connect to is a remote one (connected via GW to another
> netowork, but a ping can see the other peer) the client produces in the
> "connect" function theunkonwn error code 2751. A coonect between the same
> machines to the same remote server works Ok with a C program.
> >
> >The sample code is an extract of a larger module.
> >
> >
> >Sample_Code====================================================
> >
> >#/usr/bin/perl
> >
> > use Socket;
> > my ($remote,$port, $user, $iaddr, $paddr, $proto, $line, $mesbuf);
> >
> >$mes{'info'}="SMS from: 436644603303 to: 01250936095";
> >$mes{'user'}="sms";
> >$mes{'reportfile'}="C:\SST\server\tmp\845884a.msg";
> >$mes{'subject'}="";
> >$mes{'status'}="";
> >$mes{'id'}="";
> >$mes{'handling'}="0";
> >$mes{'filename'}="C:\\SST\\SSTSHARE\\FEEDBACK\\8458846.txt";
> >
> >$user = $mes{'user'} ;
> >open (TF, ">>d:\\temp\\test3.log");
> >print TF (localtime(time)) . " run. ($mes{'handling'}) $mes{'info'}\n";
> >print TF "user= ",$user, "\n";
> >
> >
> >$port = "100050";
> >$remote = "obelix";
> >
> >print TF "Parameters", "\n";
> >print TF "info= ", $mes{'info'}, "\n";
> >print TF "user= ",$user, "\n";
> >print TF "host= ",$remote, "\n";
> >print TF "port= ",$port, "\n";
> >
> >
> >if($remote ne "") {
> >
> > ($name, $aliases, $proto) = getprotobyname('tcp');
> > print TF "proto, name aliases " . $proto . " " . $name . " " .
> $aliases . "\n";
> > ($name, $aliases, $port) = getservbyname($port,'tcp')
> > unless $port =~ /^\d+$/;
> > print TF "Using port $port to connect to server on host
> $them...\n";
> > ($name,$aliases,$type,$len,$thisaddr) = gethostbyname("localhost");
> > print TF "type, len, thisaddr " . $type . " " . $len . " " .
> $thisaddr . "\n";
> > ($name,$aliases,$type,$len,$thataddr) = gethostbyname($remote);
> > print TF "type, len, thataddr " . $type . " " . $len . " " .
> $thataddr
> . "\n";
>
> > if (socket(SOCK,AF_INET, SOCK_STREAM, $proto)) {
> > print TF "Socket creation succeeded.\n";
> > }
> > $sockaddr = 'S n a4 x8';
> > $this = pack($sockaddr, AF_INET, 0, $thisaddr);
> > $that = pack($sockaddr, AF_INET, $port, $thataddr);
> > if (bind(SOCK, $this)) {
> > print TF "Bind succeeded.\n";
> > }
> > else {
> > die $!;
> > }
> > if (connect(SOCK, $that))
> > print TF "Connect succeeded.\n";
> > }
> > else {
> > die $!;
> > }
> > select(SOCK); $| = 1; select(STDOUT);
> > print TF "select " . $result;
> > open(MESFILE, "<" . $mes{'filename'});
> > $message = "";
> > while (<MESFILE>) {
> > $message .= $_;
> > }
> > $mesbuf = $mes{'info'} . "|" . $mes{'user'} . "|" .
> $mes{'reportfile'}
> . "|" . $mes{'status'} .
> > "|" . $mes{'id'} . "|" . $mes{'handling'} . "|" .
> $mes{'filename'} .
> "|" . $message;
> > close(MESFILE);
> > print TF $mesbuf;
> > print SOCK $mesbuf;
> > close (SOCK);
> >
> >}
> >
> >close TF;
> >exit 0;
> >
> >
- on the local machine (by using "localhost" or simply the numeric IP
address) it works _OK_
- when I try to access the remote machine (called "obelix") by name or by
address I get the error 2751 (reported as "unkonw error code" as return code
through "die)
The name "obelix" is in the local "/etc/hosts", the name is not related to
any DNS server.
"ping obelix" works fine. Also a small C program instead of the perl script
works OK.
I did not succeed to find error code 2751 anywhere. I assumed it would be a
WinSock error code but they are all in the range below 2000.
When I run my program it says "socket creation OK" and "bind OK" and then he
dies at "connect".
Please HELP!
best regards,
Pekka
------------------------------
Date: 31 Aug 1998 00:33:16 GMT
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Question about RE
Message-Id: <6scr0c$6u2@news-central.tiac.net>
In article <35E9D640.6920DF3A@freewwweb.com>,
Sam Wang <samwang@freewwweb.com> wrote:
>anybody know of a way to detect if a string begins or ends with a space
>character? i don't want it to match spaces in the middle. just at the
>beggining or end.
if (substr ($string, $[, 1) eq ' ' ||
substr ($string, -1, 1) eq ' ') {
...
}
might be one way to do it, assuming the $string scalar contains anything.
If you're interested in whitespace then
if ($string =~ /^\s/ || $string =~ /\s$/) {
...
}
might be more useful (but you should be aware of what a trailing \n might
do if $string was read from a file.)
Hope this helps,
Mike
--
mike@stok.co.uk | The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/ | PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/ | 65 F3 3F 1D 27 22 B7 41
stok@colltech.com | Collective Technologies (work)
------------------------------
Date: Mon, 31 Aug 1998 00:45:13 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Question about RE
Message-Id: <Pine.GSO.4.02A.9808301744200.4619-100000@user2.teleport.com>
On Sun, 30 Aug 1998, Sam Wang wrote:
> Subject: Question about RE
Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.
http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post
> anybody know of a way to detect if a string begins or ends with a space
> character? i don't want it to match spaces in the middle. just at the
> beggining or end.
To do this with a pattern, you want an anchored match. Check the perlre
manpage for information about anchors. Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Mon, 31 Aug 1998 03:45:33 GMT
From: bubble@shadow.net
Subject: WWW Programmer - Miami, FL
Message-Id: <6sd651$9ek$1@supernews.com>
CGI/PERL, SQL a must! Linux OS.
Part-time/full-time. Top firm.
Fax resume to: 305/377-2870
------------------------------
Date: Sun, 30 Aug 1998 14:26:34 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Y2K Date Support
Message-Id: <fl_aggie-3008981426340001@aggie.coaps.fsu.edu>
In article <35E7B3D7.F2C2CCCD@mine.com>, Mee <mee@mine.com> wrote:
+ James,
+
+ The number of linear algebra classes your friend Mee has
+ taken (and given) is probably greater than the the number
+ of years you've been on this Earth.
Then you know about coordinate translatations? If so, you should have
no problem with unix representing the current date as: 8 month, 30th
day (depending on your time zone), the 98th year, when the translation
is simply:
Gregorian numerical year = unix year + 1900
Why is that so hard for you?
+ Get a life, grow up and learn to listen.
I do. I have. I did. You made baseless assault, and still haven't addressed
the main tenet that:
the number of the current year is an arbitrary number, based upon an
arbritary, MAN-MADE definition.
You can make the argument that the definition used isn't the right one,
but you can not argue with the definition itself.
Further examples, from the emacs calendar mode:
p m calendar-print-mayan-date
p f calendar-print-french-date
p i calendar-print-islamic-date
p h calendar-print-hebrew-date
p a calendar-print-astro-day-number
p j calendar-print-julian-date
p c calendar-print-iso-date
p d calendar-print-day-of-year
Pick a calendar, any calendar.
James
------------------------------
Date: Mon, 31 Aug 1998 07:04:12 GMT
From: ptimmins@netserv.unmc.edu (Patrick Timmins)
Subject: Re: Y2K Date Support
Message-Id: <6sdhtc$fld$1@nnrp1.dejanews.com>
In article <at0G1.56$Ts1.128288@client.news.psi.net>,
abigail@fnx.com wrote:
> Patrick Timmins (ptimmins@netserv.unmc.edu) wrote on MDCCCXXIII September
> MCMXCIII in <URL: news:6s77gq$e08$1@nnrp1.dejanews.com>:
[snip]
> ++ > Hmmm. Have you ever worked with a string containing more than 4
> ++ > characters?
> ++ > Did it fit on the bus?
> ++ [snip]
> ++
> ++ byte by byte, yes
>
> And, which magical properties of time prevent it from being put on the
> bus 32 bits by 32 bits?
Sheeesh! 4 by 4. But what does string processing have to do with
the fact that what we have is a numerical processing problem originating
from a hardware limitation?
So if Unix had been designed on 64 bit systems you're saying the
2038 "software" problem would still exist? Developers would have ignored
their *hardware* and based everything on 32 bit processing instead of 64?
"What magical properties of time" made 32 bit processing so prevalent in
their work? It *wasn't* because of the hardware they were working with?
Would you please tell us all why we don't base everyting on 128 or 256
or even 512 bit processing right now? There is probably a good reason,
and I'll bet it's because of the *H* word.
Waiting breathlessly for your tangential, smoke-screen-of-a-response ...
Patrick Timmins
U. Nebraska Medical Center
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3593
**************************************
