[8995] in Perl-Users-Digest
Perl-Users Digest, Issue: 2613 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri May 15 18:07:18 1998
Date: Fri, 15 May 98 15:00:54 -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 Fri, 15 May 1998 Volume: 8 Number: 2613
Today's topics:
Re: Does Perl have a IDE?I don't like command line. (Abigail)
Re: Does Perl have a IDE?I don't like command line. (Charles DeRykus)
Re: Does Perl have a IDE?I don't like command line. (Stuart McDow)
Re: Does Perl have a IDE?I don't like command line. (Stuart McDow)
Re: Does Perl have a IDE?I don't like command line. <tchrist@mox.perl.com>
Re: Does Perl have a IDE?I don't like command line. (Greg Bacon)
Re: Does Perl have a IDE?I don't like command line. (Abigail)
Re: Does Perl have a IDE?I don't like command line. (Ilya Zakharevich)
Re: Does Perl have a IDE?I don't like command line. (Stuart McDow)
Re: Does Perl have a IDE?I don't like command line. (Greg Bacon)
Re: Does Perl have a IDE?I don't like command line. (Chip Salzenberg)
Re: Does Perl have a IDE?I don't like command line. (Stefaan A Eeckels)
Re: eval doesn't catch exit in custom die (The Morph on the Other Side of the Mirror)
Re: localtime function and Y2K compliance (I R A Aggie)
Re: localtime function and Y2K compliance <tchrist@mox.perl.com>
Needed: Cnvt Dumper'd([$HOH]) -> AOA johnvv@earthling.net
Re: New IDE for Perl <birgitt@order.booktraders.com>
Re: New Math Modules (Ilya Zakharevich)
ODBC::SQLGetDiagRec -- Win32 ionFreeman@my-dejanews.com
Re: Problem with spaces in directory path names in Perl <ebohlman@netcom.com>
Re: reading file into an array of hash <aqumsieh@matrox.com>
Re: Regex problem: substituting 3+ identical characters <aqumsieh@matrox.com>
Re: Removing ^M at the end of each line of a file. <aqumsieh@matrox.com>
Re: Scanning Perl scripts for Y2K problems <Russell_Schulz@locutus.ofB.ORG>
Re: Scanning Perl scripts for Y2K problems <Russell_Schulz@locutus.ofB.ORG>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 15 May 1998 21:05:52 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jiang$mp2$1@client3.news.psi.net>
Stuart McDow (smcdow@arlut.utexas.edu) wrote on MDCCXVIII September
MCMXCIII in <URL: news:6jhskp$rom$1@ns1.arlut.utexas.edu>:
++
++ Someone in Redmond is having a great laugh on the way to
++ the bank. They're selling an OS without even a native C compiler,
++ forcing people to buy their tools.
Well, one of the largest Unix vendors (if not the largest) Sun doesn't
deliver a compiler with its OS either. If you want one, you have to
pay.
++ Microsoft's new, more truthful ad slogan should be: "How can you make
++ money for us today?"
And Sun, SGI, HP, Oracle, Sybase, Neuron Data, etc give their products
away for free? Making money from OSses and other software products isn't
limited to MicroSoft.
Abigail
--
perl -pwle '$_ .= reverse'
------------------------------
Date: Fri, 15 May 1998 20:42:27 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <Et0Mus.Do8@news.boeing.com>
In article <6jhk40$e1t$2@csnews.cs.colorado.edu>,
Tom Christiansen <tchrist@mox.perl.com> wrote:
> [courtesy cc of this posting sent to cited author via email]
>
>In comp.lang.perl.misc, fsg@ultranet.com writes:
>:It's like screaming at a pig that has taken a dump in your yard:
>:ultimately, you're not going to educate the pig. Instead, build a fence
>:around your yard. Make a killfile,
>
>
>
>And shoot the pig?
>
Ssshhh,, Tom... Remember your Gandhian roots. :)
"...It's too bad I stepped on your holy cow. Please give it
some fresh grass and tell it not to worry because vegetarians
are not looking for steak." T. Christiansen
--
Charles DeRykus
------------------------------
Date: 15 May 1998 21:15:19 GMT
From: smcdow@arlut.utexas.edu (Stuart McDow)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jib97$age$1@ns1.arlut.utexas.edu>
fsg@ultranet.com writes:
>
> Actually, if you want to do that, please call me at (508) 898 6490.
> Data General makes a product called 'TermServer in a Box', which is
> a rack mounted NT machine that does multi-user display, has
> clustered reliability, and includes a really sweet RAID array. It
> supplies multi-user capability to Windows Terminals (and some X
> terminals), many of them, pretty much seamlessly. It's a really
> _great_ product.
I haven't heard of it, and I'm a little skeptical. Are you saying that
5, or fifteen, or fifty, or 500 people could run, say Word,
simultaneously on different displays? If so, then how come the whole
world hasn't heard about it?
--
Stuart McDow Applied Research Laboratories
smcdow@arlut.utexas.edu The University of Texas at Austin
"Look for beauty in roughness, unpolishedness"
------------------------------
Date: 15 May 1998 21:17:23 GMT
From: smcdow@arlut.utexas.edu (Stuart McDow)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jibd3$aqs$1@ns1.arlut.utexas.edu>
kfox@pt0204.pto.ford.com (Ken Fox) writes:
>
> Does anybody use a Bell Labs variant of Unix anymore? ;)
I think just about all variants are variants of Bell Labs Unix.
--
Stuart McDow Applied Research Laboratories
smcdow@arlut.utexas.edu The University of Texas at Austin
"Look for beauty in roughness, unpolishedness"
------------------------------
Date: 15 May 1998 21:19:56 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jibhs$flu$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
abigail@fnx.com writes:
:And Sun, SGI, HP, Oracle, Sybase, Neuron Data, etc give their products
:away for free? Making money from OSses and other software products isn't
:limited to MicroSoft.
You are correct.
Nonetheless, locking you into closed nonstandard Microsoft systems
is quite different from leaving you free to roam the realm of
Open Systems, isn't it? Kids today forget the bad old days
of Closed Systems and IBM. Thither we now return.
--tom
--
: There may be 2 or three ways to perform a particular task, but there will
: not be 10,000 as there are in perl.
I think you may be exaggerating slightly. Perl isn't that good yet.
-- Larry Wall, 5 Jun 91 5:11:004GMT
------------------------------
Date: 15 May 1998 21:37:59 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jicjn$3k9$1@info.uah.edu>
In article <6ji0f0$edo$1@mars.mcs.net>,
les@MCS.COM (Leslie Mikesell) writes:
: Maybe my memory is just getting fuzzy but I seem to recall a time
: when Larry did answer questions on the net and I don't remember
: him ever complaining about the questions being dumb. And since
: there were no other perl experts at the time, the questions were
: mostly pretty dumb.
Well, there's the fact that the ratio of the sizes of the docset then and
now is nearly zero. Larry was also faced with the daunting task of
showing people how cool Perl is. He's admitted that he was playing PR
games.
: Also, I don't ever remember him insulting
: people who asked questions that really were operating system or
: environment issues. After all, if a perl program ran without using
: OS functions, how would anybody know if it worked or not?
Comparing Larry's hyping Perl to the world then and clpm of today is
fallacious. clpm suffers from a huge topicality problem. If we didn't
try to weed out the off-topic posts (i.e., not Perl-specific), this
newsgroup would be much worse off than it is now.
: Am I just being nostalgic here or are there some news archives that
: go back that far?
The situation was very different then. It's invalid to compare it to
the current state of affairs.
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: 15 May 1998 21:31:16 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jic74$nk5$1@client3.news.psi.net>
Greg Bacon (gbacon@cs.uah.edu) wrote on MDCCXVIII September MCMXCIII in
<URL: news:6ji6b8$kru$1@info.uah.edu>:
++ In article <6jht3q$nn$1@ultranet.com>,
++ fsg@ultranet.com writes:
++
++ : The IDE also makes
++ : the annoying and tedious part of writing win32 programs (designing the
++ : interface) trivial, which is good, because I've got better things to worry
++ : about than implementing a button.
++
++ What of Tk? Tk code will run on many, many, many more platforms than
++ the hoarde fodder will.
Perhaps.
But that's not what is most important. Development time is important
too. Our company produces software, and part of the software is a GUI
interface. To run and build the GUI aspect, we use a commercial set of
libraries, and an development environment. That enables the programmer to
create and change the screens with buttons, menus, lists and scrollbars
without wasting too much time. It easily enforces consistent styles over
the hundreds of different screens. The editor spits out a ".rc" file,
from which C files (source + headers) are generated by make. You do the
job once, and it compiles on Unices and NT without porting problems.
Does that hide the programmer from what exactly is going on? Yes, it
certainly does. Is that bad? Nope, not in my opinion. It's a frigging
button. There's no point in wasting time to build a button; let the
programmer spend time on programming the call back function, that's
what counts.
Abigail
--
perl -MLWP::UserAgent -MHTML::TreeBuilder -MHTML::FormatText -wle'print +(HTML::FormatText -> new -> format (HTML::TreeBuilder -> new -> parse (LWP::UserAgent -> new -> request (HTTP::Request -> new ("GET", "http://work.ucsd.edu:5141/cgi-bin/http_webster?isindex=perl")) -> content)) =~ /(.*\))[-\s]+Additional/s) [0]'
------------------------------
Date: 15 May 1998 21:42:33 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jics9$g8b$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Tom Christiansen
<tchrist@mox.perl.com>],
who wrote in article <6jibhs$flu$1@csnews.cs.colorado.edu>:
> Nonetheless, locking you into closed nonstandard Microsoft systems
> is quite different from leaving you free to roam the realm of
> Open Systems, isn't it? Kids today forget the bad old days
> of Closed Systems and IBM. Thither we now return.
This is almost OK, except that DOSISH systems are almost standard (and
some take backward compatibility *very* seriously, hundreds times more
seriously than p5p crowd), and *nices are a most nonstandard batch of
OSes.
I did not trace the Win32 succession sequence, but - basing on no
experience - I would think that it could stabilize nowadays. Today this
leaves basically 3 uncompatible DOSISH systems: DOS, OS/2 and Win32
APIs (if you can call DOS an API ;-).
Now how many different files for *nix flavors in perl*/hints/*.sh ?
1/2 ;-)
Ilya
------------------------------
Date: 15 May 1998 21:35:07 GMT
From: smcdow@arlut.utexas.edu (Stuart McDow)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jiceb$d1n$1@ns1.arlut.utexas.edu>
abigail@fnx.com (Abigail) writes:
>
> Well, one of the largest Unix vendors (if not the largest) Sun
> doesn't deliver a compiler with its OS either. If you want one, you
> have to pay.
Strawman.
$ uname -a ; gcc -v
SunOS sgggsd16.arlut.utexas.edu 5.6 Generic_105182-03 i86pc i386 i86pc
Reading specs from /opt/depot/gcc/lib/gcc-lib/i386-pc-solaris2.6/2.8.1/specs
gcc version 2.8.1
Do you pay for gcc?
> ++ Microsoft's new, more truthful ad slogan should be: "How can you make
> ++ money for us today?"
>
> And Sun, SGI, HP, Oracle, Sybase, Neuron Data, etc give their products
> away for free? Making money from OSses and other software products isn't
> limited to MicroSoft.
Agreed. I have no problem with that. OSes are OSes. What I do have a
problem with is selling OSes that make it impossible to do development
on without buying their IDEs and/or SDKs. At least Sun, SGI, HP, et al
ship with include files and libraries. You can build gcc on them and
go to town.
I haven't seen a native gcc port to NT that I like yet (I hope that
I'm underinformed and someone proves me wrong). That's 'cause NT
doesn't ship with any sort of system definition (include files,
libraries. etc). You have to spend a couple hundred dollars and buy a
damn SDK for that. The include files and libraries are part of the
*SDK*, not the *OS*, a situation which I find ludicrous. It's a
situation in which the closest thing to a "native" compiler for NT is
the MS SDKs ('cause they wrote the OS, and they presumably know how it
was built). So, you get to pay MS twice - once for the OS and once for
the SDK. (Even if you don't buy the SDK from MS, you still pay
twice). It's the having to pay for the SDK - 'cause there's *no* other
way to develop software on that platform - that pisses me off.
--
Stuart McDow Applied Research Laboratories
smcdow@arlut.utexas.edu The University of Texas at Austin
"Look for beauty in roughness, unpolishedness"
------------------------------
Date: 15 May 1998 21:42:12 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jicrk$3k9$2@info.uah.edu>
[Posted and mailed]
In article <6jfj3d$k3k@mozo.cc.purdue.edu>,
gebis@albrecht.ecn.purdue.edu (Michael J Gebis) writes:
: Like I said before, I think I've been edging up on hostile in some of
: my posts, and I'd like to apologize to the newsgroup in general for
: that. I'm genuinely interested in a response to my question: What
: can I do to help?
If you wouldn't feel right about asking people to quit polluting our
newsgroup, then all you can do is continue to offer what signal you can
while waiting for clpmod with the rest of us.
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: Fri, 15 May 1998 21:48:48 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jidao$fi$1@cyprus.atlantic.net>
According to fsg@ultranet.com:
>If in the act of attracting 1,000 posers, 1 cool hacker is made,
>let's attract 1,000,000.
Lots of fallacies there. First two:
1. Resources are infinite. (We can't cope with 1M lusers.)
2. This is the only way to make a cool hacker. (I don't think so.)
--
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: 15 May 1998 21:50:38 GMT
From: Stefaan.Eeckels@ecc.lu (Stefaan A Eeckels)
To: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6jidbe$it3$1@justus.ecc.lu>
[Posted and mailed]
In article <6jia10$c61$1@mathserv.mps.ohio-state.edu>,
ilya@math.ohio-state.edu (Ilya Zakharevich) writes:
> The questions are simple:
> a) Does tkman has hierarchical expandable-collapsible
> table-of-context?
Yep (if you mean table of contents) else please explain what
a table-of-context is (if it's a permuted index, then no).
> b) Quick powerful global search?
Yes. Both fuzzy and exact, on virtually each word in the
man pages (using glimpse).
> c) Hyperlinks? (Perl docs in INF form have 3500 (? do not
> remember exactly) hyperlinks, I would think that 40% of them
> are fake - going to "this" page, but the rest is very useful)
Yes. Each word is a potential hyperlink, but TkMan even finds
the real ones (like in SEE ALSO) and highlights them.
> d) Hierachical searchable index?
Straining here - there's only a 2 level hierarchy in the
UNIX man page setup. But you can define your own subsets
(like grouping all the Perl docs in a volume, even though
they could reside in different locations).
TkMan also has highlights (and places all highlighted pages
in a volume for easy reference), and handles RCS versioning
of man pages.
It's a great program (and amazingly enough, written in
vanilla Tcl/Tk). You should try it, if only for the
incredible tricks it does with the man pages.
BTW, it also displays GNU info documents, and RFCs.
--
Stefaan
--
PGP key available from PGP key servers (http://www.pgp.net/pgpnet/)
___________________________________________________________________
Williams and Holland's Law: If enough data is collected,
anything may be proven by statistical methods.
------------------------------
Date: 15 May 1998 17:51:54 -0400
From: gtc@panix.com (The Morph on the Other Side of the Mirror)
Subject: Re: eval doesn't catch exit in custom die
Message-Id: <6jiddq$gbn@panix3.panix.com>
bart.mediamind@tornado.be (Bart Lateur) writes:
>What a cryptic subject line. But anyway, here's the problem. The
>recommended way to do some things, like timeouts, is through an eval/die
>pair. However, I've noticed that if you set $SIG{__DIE__} to do some
>custom reporting, like in
> $SIG{__WARN__} = sub { ... }; # custom error report
> $SIG{__DIE__} = sub { &{$SIG{__WARN__}; exit(1); };
^^^^
[eval { (something that dies) } doesn't work]
>Question: is there another way to terminate a __DIE__ sub, that is NOT
>fatal in eval? "die" doesn't die in eval, but ONLY if you didn't set
>$SIG{__DIE__} yourself (even outside of the eval block). Surely, this
>can't be the way it's supposed to be?
You answered your own question. die doesn't die in an eval, so you
want *your* die to die rather than exit:
$SIG{__DIE__} = sub { &{$SIG{__WARN__}; die ""; };
See the perlvar (for $SIG{__DIE__}) and perlfunc (for die and eval)
manpages for more information.
--d/M
~~
{} "Hey, don't walk away from me when I'm | dvora silberman
{} talking about usenet!" | gtc@panix.com
{} -- jeffrey, to random-kitty | that morph chick
------------------------------
Date: Fri, 15 May 1998 16:53:51 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: localtime function and Y2K compliance
Message-Id: <fl_aggie-1505981653520001@aggie.coaps.fsu.edu>
In article <355C9AB2.183A869@moen.com>, Jennifer Amon <jamon@moen.com> wrote:
+ If that is the case, then 2000 would come back as 100, and
+ 2001 would come back as 101, etc.
+ Is this really the case, and is there any plan for that
+ to change?
Yes, that really is the case. I doubt it would change, tho the underlying
data structures may change from a 32 bit time to a 64 bit time. As an
example:
$seconds=40*365.25*24*3600;
# 40 years * 365.25 days/year * 24 hours/day * 3600 seconds/hour
$time=localtime($seconds);
print "$time\n";
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($seconds);
print "Year is: $year\n";
Results:
Thu Dec 31 19:00:00 2009
Year is: 109
I'm in the US Eastern Time Zone, so I'll be off GMT by 5 hours, which
is why 40 years from 1970 results in the year 2009, not 2010. Replacing
'localtime' with 'gmtime' results in:
Fri Jan 1 00:00:00 2010
Year is: 110
Which is the expected result... :)
James
--
Consulting Minister for Consultants, DNRC
The Bill of Rights is paid in Responsibilities - Jean McGuire
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/CPAN-local/doc/FAQs/cgi/idiots-guide.html>
------------------------------
Date: 15 May 1998 20:41:24 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: localtime function and Y2K compliance
Message-Id: <6ji99k$ecq$2@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
Jennifer Amon <jamon@moen.com> writes:
:If that is the case, then 2000 would come back as 100, and
:2001 would come back as 101, etc.
:Is this really the case, and is there any plan for that
:to change?
Of course it is, and why would want to break thousands of
programs all over the world?
--tom
--
"Espousing the eponymous /cgi-bin/perl.exe?FMH.pl execution model is like
reading a suicide note -- three days too late."
--Tom Christiansen <tchrist@mox.perl.com>
------------------------------
Date: Fri, 15 May 1998 21:44:45 GMT
From: johnvv@earthling.net
Subject: Needed: Cnvt Dumper'd([$HOH]) -> AOA
Message-Id: <6jid0d$ag4$1@nnrp1.dejanews.com>
Hi All,
I built a hash of hashes DB (thanks gsar),
hooked it up to a Client/Server, ahh, server (thanks tchrist)
and have it pumping out Dumper style strings.
On the other front,
I have been making tables from arrays of arrays via a neat little Table.pm
(thanks Reza Naima )
All I need now is a way to convert the hoh strings into aoa to feed to the
above Table.pm with a lot of leading undefs to get the really pretty picture
I'm looking for.
Obviously, if I got this far, I can get the rest but I'm get'n so damn close.
Anything already built that I can kindly borrow.
Thx in Adv, John van V.
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Fri, 15 May 1998 17:36:16 -0400
From: Birgitt Funk <birgitt@order.booktraders.com>
Subject: Re: New IDE for Perl
Message-Id: <355CB550.1A1816DB@order.booktraders.com>
Zenin wrote:
>
> Stuart McDow <smcdow@arlut.utexas.edu> wrote:
> : The *first* IDE? What, then, is emacs?
>
> Emacs is a religion, not an IDE. :-)
>
I try to find out what I absolutely have to learn and what not.
I (almost) came to the conclusion that I will not be punished to
ignore emacs and be o.k with vim only.
All the wise men are using emacs, does that mean one really
can't skip it ? Or is it just because you are not only wise,
but also a (tiny bit) old(er), and in those days you just learned
emacs anyhow and got used to it ?
Birgitt Funk
------------------------------
Date: 15 May 1998 21:02:38 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: New Math Modules
Message-Id: <6jiahe$cua$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Ala Qumsieh
<aqumsieh@matrox.com>],
who wrote in article <355C7428.8D1F6D14@matrox.com>:
> First of all, I checked Math::Pari. I am not exactly familiar with PARI but I
> don't think my modules operate similarly. (please correct me if I'm wrong).
>
> My modules perform *symbolic* manipulation on a given string. For example, I
> have a function called simplify which tries to find the simplest form of an
> algebraic expression:
>
> $expr = '(((-5x^0.5 * 2x) / (3x^2 + -(2x * 3x))) + 4x^-0.5)';
> $result = simplify($expr);
> $result now contains "7.33333333333333x^-0.5"
Here comes a confusion: one can consider
F = x y z + 1
as an "expression", and as an element of Z[x,y,z]. In first case
doing manipulation is called "symbolic manipulations", in the second
it is just doing manipulation with data (=glorified numbers).
You claim to do the first. PARI does the second.
Since the result is the same, the difference is pretty vague (in your
case it would correspond to ^0.5 being a badly-defined thing, in PARI
you need to "pick a branch" in the sense of defining
x_1_2 = mod(t, t^2-x)
which gives you a new datum x_1_2 which behaves as the square root
of x).
Ilya
------------------------------
Date: Fri, 15 May 1998 21:07:46 GMT
From: ionFreeman@my-dejanews.com
Subject: ODBC::SQLGetDiagRec -- Win32
Message-Id: <6jiar2$7ih$1@nnrp1.dejanews.com>
I'd like to get the whole set of errors generated by the DBMS when they
occur. ODBC::Error() only returns the last. Is there some way to get the
state or diagnostic information through the ODBC module?
icf
sde
originet
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Fri, 15 May 1998 20:57:16 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: Problem with spaces in directory path names in Perl on WIN32
Message-Id: <ebohlmanEt0nJG.KtM@netcom.com>
Buzz Moschetti <buzz@bear.com> wrote:
: Careful about doing that in perl code:
: $path = "C:\Program files\DevStudio\programs\pre...";
: Those backslashes are interpreted within double quotes. Use single
: quotes instead:
: $path = 'C:\Program files\DevStudio\programs\pre...';
If you're going to pass it to the shell, you're going to *have* to stick
*literal* double-quotes into it somehow, since the shell needs to see
them to stop if from interpreting C:\Program as the command name and
files\DevStudio... as the first argument.
$path = '"C:\Program files..."' is probably the best solution.
------------------------------
Date: Fri, 15 May 1998 16:34:49 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: reading file into an array of hash
Message-Id: <355CA6E9.3576F425@matrox.com>
brian d foy wrote:
> In article <355C550A.22C7BA47@matrox.com>, Ala Qumsieh <aqumsieh@matrox.com> posted:
>
> >> while (<FILE) {
> >
> >Ooops .. that should've been:
> >
> >while (<FILE>) { # of course you knew that! ;-)
>
> well, it gets worse. did you try that with warnings on a current
> perl? the stuff you read from FILE might spuriously end the while
> loop if it evaluates to false.
>
> while( defined( $_ = <FILE> ) ) { ... }
>
> good luck :)
>
> --
> brian d foy <comdog@computerdog.com>
> CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
> Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
> Perl Mongers <URL:http://www.pm.org>
Oooops :-)
--
Ala Qumsieh | No .. not just another
ASIC Design Engineer | Perl Hacker!!!!!
Matrox Graphics Inc. |
Montreal, Quebec | (Not yet!)
------------------------------
Date: Fri, 15 May 1998 16:45:00 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Regex problem: substituting 3+ identical characters with just one
Message-Id: <355CA94C.6E515454@matrox.com>
J|rgen P|nter wrote:
> then stript out all _ and to get e.g. 'lllooookkk'.
That's a good start ;-)
> Now enter Perl. I use a regex to subtitute each occurence of 3 or more
> identical characters with just one character. Being a learner, the regex is
> very simple:
> s/([a-zA-Z0-9])\1\1+/\1/g
Woooooo!! Why so complicated? Keep in mind that Perl is synonymous with laziness!
;-)
You probably need:
tr/a-zA-Z0-9//s;
> Now the obvious problem is that my regex goes wrong if e.g. 'Page 22' turns
> into 'Page 22222' and will thus read 'Page 2' after substitution.
Yep ... that's a problem. I don't really see an easy solution for this! Unless ..
the characters repeat in some defined fashion.
> Another problem is tat right now I don't have time to immerse myself in regex
> and/or UNIX. I'm just looking for a temporary fix until I can go after the
> real problem (why does the printout look the way it does?).
>
I don't know. Sorry!
> So, any ideas are very welcome.
>
> TIA
> Juergen Puenter
Hope that was (semi-)helpful ;-)
--
Ala Qumsieh | No .. not just another
ASIC Design Engineer | Perl Hacker!!!!!
Matrox Graphics Inc. |
Montreal, Quebec | (Not yet!)
------------------------------
Date: Fri, 15 May 1998 16:50:30 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Removing ^M at the end of each line of a file.
Message-Id: <355CAA95.6AF1BFA@matrox.com>
Abigail wrote:
> Leonard Miller (millers3@sonic.net) wrote on MDCCXVIII September MCMXCIII
> in <URL: news:millers3-1405982327540001@d58.pm8.sonic.net>:
> ++ In article <6j9jhi$plt$1@inn.imcn.com>, "N6006024"
> ++ <pernande@dev.amadeus.net> wrote:
> ++
> ++ > After having saved a perl script with Homesite 3.0, when I open the script
> ++ > using vi I can see that each line is ended by a ^M. Consequently, I made a
> ++ > perl script to remove ^M.
> ++ > My code looks like this :
> ++ >
> ++ > open (FILE, ">$ARGV[0]") || die "Cannot open $ARGV[0] : $!";
> ++ > while (<FILE>) {
> ++ > s/\^M//g;
> ++ > print <FILE> $_;
> ++ > }
> ++ > close(FILE) || die $!;
> ++ >
> ++ > Thanks in advance for your help,
> ++ >
> ++ > Philippe.
> ++
> ++ When you print to a FILEHANDLE the angle operator is not used.
> ++ Should be:
> ++
> ++ print FILE $_;
>
> No, not really. Think about it.
>
> Abigail
> --
> perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\n";'
I think the real problem is with the s// statement.
s/^M//g; # this will remove lines that contain a caret (^) followed by a capital
M
A caret followed by M is not the same as the Ctrl-M character.
You should use this instead:
s/\cM$//g;
Enjoy,
--
Ala Qumsieh | No .. not just another
ASIC Design Engineer | Perl Hacker!!!!!
Matrox Graphics Inc. |
Montreal, Quebec | (Not yet!)
------------------------------
Date: Fri, 15 May 1998 14:36:16 +0100
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: Scanning Perl scripts for Y2K problems
Message-Id: <19980515.143616.1Z1.rnr.w164w@locutus.ofB.ORG>
Randal Schwartz <merlyn@stonehenge.com> writes:
> Bart> localtime() Y2K compliant? Yeah, right. Calculating years since
> Bart> 1900 is dubious, to say the least.
>
> Uh? Huh? Maybe dubious to you. Not at all dubious to me.
ok, we won't check your code. nor anyone else who knows that particular
call inside out (and doesn't let anyone near their code who doesn't).
> Or are you saying that anything that references Unix Epoch
> (seconds since jan 1, 1970) is *also* dubious because it has a
> basepointer that's not the year 0?
of course not. there is no confusion with that number's interpretation.
> I'm just not following.
intentionally...?
the number returned is y-1900. it can also be interpreted (since well
before 1970) as y%100.
most usage of the year is y%100.
I'm confident you know which interpretation will have most likely been used.
--
Russell_Schulz@locutus.ofB.ORG Shad 86c
------------------------------
Date: Fri, 15 May 1998 15:46:13 +0100
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: Scanning Perl scripts for Y2K problems
Message-Id: <19980515.154613.2E2.rnr.w164w@locutus.ofB.ORG>
Russell Schulz <Russell_Schulz@locutus.ofB.ORG> writes:
> the number returned is y-1900. it can also be interpreted (since well
> before 1970) as y%100.
>
> most usage of the year is y%100.
>
> I'm confident you know which interpretation will have most likely
> been used.
oops, for `most likely' read `all too frequently'.
(and maybe remove the split infinitive.)
--
Russell_Schulz@locutus.ofB.ORG Shad 86c
------------------------------
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 2613
**************************************
