[9869] in Perl-Users-Digest
Perl-Users Digest, Issue: 3462 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 17 10:07:28 1998
Date: Mon, 17 Aug 98 07:00:31 -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, 17 Aug 1998 Volume: 8 Number: 3462
Today's topics:
Australian CGI configurer Rqd. dacgroup@my-dejanews.com
Re: CGI on Browser ikarydis@my-dejanews.com
Re: COBOL and Perl <birgitt@hamburg.citde.net>
Re: COBOL and Perl (Shaun C. Murray)
Re: COBOL and Perl scott@softbase.com
Re: Converting to lowecase <hauk@forumnett.no>
Re: Converting to lowecase <sneaker@sneex.fccj.org>
Re: Converting to lowecase <jdf@pobox.com>
Re: Correct MIME-type? <minich@globalnet.co.uk>
Re: Docs for CGI.pm! (Larry Hunter)
Re: Embedding SQL in Perl Script? <stpierre@ttlc.net>
GUI and Perl <garry@extech.msk.su>
Re: GUI and Perl <sneaker@sneex.fccj.org>
Re: GUI and Perl <jdf@pobox.com>
Re: here's an implementation of diff in perl <dfan@thecia.net>
Re: Kermit =~ /You are a LOSER. Take that stick out of dturley@pobox.com
Re: Kermit Speaks (Craig Berry)
Re: Kermit Speaks (Nathan V. Patwardhan)
No access for perl script? <mats.elfstrom@lund.mail.telia.com>
Noise <sneaker@sneex.fccj.org>
Re: Perl and NT and SQLServer (Ivica Vucak)
Re: Perl's equiv of "cc -DDEBUG" ? (Abigail)
Pipes on Win32 b_pillai@hotmail.com
Pipes on Win32 b_pillai@hotmail.com
Re: Q: How to read all the file name in a directory (Stefaan A Eeckels)
Re: Q: How to read all the file name in a directory (Michael J Gebis)
Re: Recommend a good editor aderoy@mnsi.net
Re: Recommend a good editor news4jim@my-dejanews.com
Re: Reference Confussion (Craig Berry)
Run Perl5 in Win95 <fnemec@sti.com.br>
su on NT <j8flynn@hursley.ibm.com>
unpack question b_redeker@hotmail.com
Re: verify password <admin@kewl.com.au>
Re: verify password <sneaker@sneex.fccj.org>
Re: win32 printing <ghia@telerama.lm.com>
Re: win32 printing <sneaker@sneex.fccj.org>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 17 Aug 1998 13:09:11 GMT
From: dacgroup@my-dejanews.com
Subject: Australian CGI configurer Rqd.
Message-Id: <6r9a1n$do0$1@nnrp1.dejanews.com>
We are looking for someone to untertake some casual work
installing CGI-scripts for us.
The scripts are pre-made Perl, and just need configuring. They are
an advertising banner rotation system, and a searchable database of URL's
similar in operation to Yahoo.
We have a preference for that person to be based in Australia.
Regards,
dan
Creative Director.
www.thedacgroup.com
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Mon, 17 Aug 1998 13:06:44 GMT
From: ikarydis@my-dejanews.com
Subject: Re: CGI on Browser
Message-Id: <6r99t5$dnc$1@nnrp1.dejanews.com>
Perl Scripts do not run on the client side, i.e Netscape Navigator or
Explorer but on the server side. What you need to do is either i)send the
script to your ISP to install it in the cgi-bin directory or ii) install a
web server on your machine, such as Peer Web Services or Internet Information
server if you use Windows NT, or Apache if you use Unix. You can also try the
Personal Web Server on Windows 95 but I'm not sure if it supports CGI.
I.Karydis
In article <35D1DF1B.4C1DD819@post1.com>,
Lawrence Han <lawrence_han@post1.com> wrote:
> Hi there,
>
> I am a new perl programmer.
> I am able to run my perl 5.0 on win95. Consider the following:
>
> print "Content-type: text/html\n\n";
> print "<html><head><title>Nil</title></head>\n";
> print "<body bgcolor=black text=white>\n";
> print "<br>Hello World!</br></body></html>\n";
>
> When I run on my DOS prompt C:\perl\perl hello.cgi, things seems to be
> running smoothly. However when I launched my Netscape browser with the
> URL pointing to the hello.cgi on my hard disk, the browser doesn't seem
> to execute anything. I get the entire perl code printed out instead.
> Please help.
>
> lawrence_han@post1.com :)
>
>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Mon, 17 Aug 1998 02:20:15 +0000
From: Birgitt Funk <birgitt@hamburg.citde.net>
Subject: Re: COBOL and Perl
Message-Id: <6r8m08$kqd$1@trader.ipf.de>
Abigail wrote:
>
> birgitt@my-dejanews.com (birgitt@my-dejanews.com) wrote on MDCCCXI
> ++ C so far and not getting into Perl yet, I would like to know
> ++ if in general COBOL programs could be rewritten effectively in
> ++ Perl.
>
> Well, you can always write equivalent programs in Perl.
That's a good enough answer. :-)
>
> ++ I saw a thread in comp.lang.cobol where someone indicated that
> ++ a three page COBOL program could be rewritten in AWK in five
> ++ lines, so I wonder if this might be the same with Perl.
>
> Oh, yeah, for 3 line COBOL programs that might be true. But what
> will you do for a 150,000 line COBOL program?
Rewrite it.
> COBOL was together with FORTRAN one of the first high level languages.
> It dates from the late 40's/early 50's. Perl was developped 40 years
> later. COBOL was a major achievement in its time, and developped by
> a remarkable woman, Admiral Grace Hopper. Perl was developped by a
> remarkable man, Larry Wall. But where Hopper was a pioneer, Wall had
> 40 years of experience and gaining knowledge to work with.
>
> That is why Perl is Perl, and nowhere near close to COBOL. That's also
> why COBOL isn't suitable for modern programming.
That seems exactly to be the problem. A midzise company with around
600 employees/PC in a WANG environment has developed a complete
suite of applications in COBOL specifically for the kind of business
in question.
The decision to be made within the next one to eight years is how long
they can maintain these COBOL programs and how reasonable or not it
might be.
If they will be rewritten in another language and ported to another
OS/hardware, my silent question to myself was if Perl/Unix would be
an alternative.
Although I certainly don't understand anything yet, there
are parts of these applications which will be rewritten in Perl
for other reasons than redesigning the whole hardware/network
environment and enhancing/updating/developing new applications.
If that has to be done, I just was wondering, why not rewriting
the whole thing at once.
Thanks for your kind answer. Now I will have a good read on Grace
Hopper. :-)
Birgitt Funk
------------------------------
Date: 17 Aug 1998 13:08:02 GMT
From: scm@enterprise.net (Shaun C. Murray)
Subject: Re: COBOL and Perl
Message-Id: <6r99vi$c8j$4@news.enterprise.net>
In article <6r7tk8$3ql$1@client3.news.psi.net>, abigail@fnx.com says...
>
>birgitt@my-dejanews.com (birgitt@my-dejanews.com) wrote on MDCCCXI
>++ I will be exposed to COBOL programs on my first internship
>++ and wonder if COBOL could replace the role of PASCAL for me.
>
>No.
Short, to the point but wrong. The two languages overlap pretty much and a good
upbringing in structured Pascal programming is just as applicable to COBOL as
almost any language. I spend most of my programming time using either COBOL or
Delphi. They aren't that different and normal pascal is even closer.
The OO extensions in COBOL are ahead of Delphi for that matter.
>
>++ Having skipped reading much about PASCAL, reading only about
>++ C so far and not getting into Perl yet, I would like to know
>++ if in general COBOL programs could be rewritten effectively in
>++ Perl.
>
>Well, you can always write equivalent programs in Perl.
But how easily can you do it is the question. COBOL is strong in many areas
that Perl is weak in and vice-versa.
>
>++ I saw a thread in comp.lang.cobol where someone indicated that
>++ a three page COBOL program could be rewritten in AWK in five
>++ lines, so I wonder if this might be the same with Perl.
>
>Oh, yeah, for 3 line COBOL programs that might be true. But what
>will you do for a 150,000 line COBOL program?
The thread in question was a specific case which AWK did well. COBOL is also a
lot more verbose than AWK and also more maintainable too.
>
>++ Are there things in COBOL which can't be done in Perl.
>
>No. They're Turing equivalent.
So's C but I wouldn't write a business app from the ground up with that.
>
>++ Are there any or many ?
>
>
>COBOL was together with FORTRAN one of the first high level languages.
>It dates from the late 40's/early 50's. Perl was developped 40 years
>later. COBOL was a major achievement in its time, and developped by
>a remarkable woman, Admiral Grace Hopper. Perl was developped by a
>remarkable man, Larry Wall. But where Hopper was a pioneer, Wall had
>40 years of experience and gaining knowledge to work with.
>
>That is why Perl is Perl, and nowhere near close to COBOL. That's also
>why COBOL isn't suitable for modern programming.
I think you should read up on COBOL before you cast your stones. COBOL isn't
the same language it was when Hopper developed it. The 1985 standard improved
it a lot and the Object Oriented extensions pretty much put it at the vanguard
of current languages.
It's pointless arguing that language A is better than language B without a
context.
Shaun
------------------------------
Date: 17 Aug 1998 13:32:18 GMT
From: scott@softbase.com
Subject: Re: COBOL and Perl
Message-Id: <35d830e2.0@news.new-era.net>
Birgitt Funk (birgitt@hamburg.citde.net) wrote:
> If that has to be done, I just was wondering, why not rewriting
> the whole thing at once.
Or write a COBOL interpreter in Perl.
Scott
--
Look at Softbase Systems' client/server tools, www.softbase.com
Check out the Essential 97 package for Windows 95 www.skwc.com/essent
All my other cool web pages are available from that site too!
My demo tape, artwork, poetry, The Windows 95 Book FAQ, and more.
------------------------------
Date: Mon, 17 Aug 1998 10:51:35 +0200
From: Hauk Langlo <hauk@forumnett.no>
Subject: Re: Converting to lowecase
Message-Id: <35D7EF17.70804026@forumnett.no>
Craig Berry wrote:
> The *very first line matching the string 'lowercase' gives you your
> answer! Now, wouldn't that have been easier to do, rather than waiting
> for an answer from Usenet, and bothering thousands of people?
You are ofcourse right about that. The problem has been though that due to
some problems with my software, the server I'm using etc, I have not been
able to use the perl man and docs lately. Besides, I find it kind of strange
that this board seem pretty hostile to newbies in general. If someone ask a
question that is in the experts eye pretty basic, instead of offering a tip
or solution the poor newbie is slagged of and told to read the manuals (like
if he had not tried this allready).
I remember the friendly enviroment there used to be on similar Amiga
programing boards some years ago. There people would help eachother out no
matter what kind of stupid questions was asked. If this board are supposed to
be for proffesional programmers only, then it should be clearly stated
somewhere.
And I'm apologizing to the tousands of people i have bothered with my
question.
Hauk Langlo (sticking to his books from now on)
------------------------------
Date: Mon, 17 Aug 1998 08:11:21 -0400
From: Bill 'Sneex' Jones <sneaker@sneex.fccj.org>
Subject: Re: Converting to lowecase
Message-Id: <35D81DE9.397B817B@sneex.fccj.org>
Hauk Langlo wrote:
>
> Craig Berry wrote:
>
> > The *very first line matching the string 'lowercase' gives you your
> > answer! Now, wouldn't that have been easier to do, rather than waiting
> > for an answer from Usenet, and bothering thousands of people?
>
> You are ofcourse right about that. The problem has been though that due to
> some problems with my software, the server I'm using etc, I have not been
> able to use the perl man and docs lately.
>
> Hauk Langlo (sticking to his books from now on)
Hello :]
Check your /etc/man.config file to see that it is pointing
to your Perl docs correctly, also you may wish to verify
that the MANPATH Env is set right, then double check the
'makewhatis' program to create/recreate proper man paths :]
HTH,
-Sneex- :]
__________________________________________________________________
Bill Jones | FCCJ Webmaster | Life is a 'Do it yourself' thing...
http://webmaster.fccj.org/cgi/mail?webmaster
------------------------------
Date: 17 Aug 1998 09:07:36 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: Hauk Langlo <hauk@forumnett.no>
Subject: Re: Converting to lowecase
Message-Id: <k947og5z.fsf@mailhost.panix.com>
Hauk Langlo <hauk@forumnett.no> writes:
> The problem has been though that due to some problems with my
> software, the server I'm using etc, I have not been able to use the
> perl man and docs lately.
If you can use perl, then you can use perldoc, since they're both in
your PATH. If you can use perldoc, then you've got the entire manual
at hand, including all of the FAQs.
> Besides, I find it kind of strange that this board seem pretty
> hostile to newbies in general.
This is a queer but common misconception that I can't understand. The
experts who float around this newsgroup are very helpful to those new
users who have consulted the documentation, but still don't understand
a given concept. In fact, sometimes the folks who are most adamant in
their use of "RTFM" are the most generous in their example code and
explanations when the asker has done their homework.
> If someone ask a question that is in the experts eye pretty basic,
> instead of offering a tip or solution the poor newbie is slagged of
> and told to read the manuals (like if he had not tried this
> allready).
Precisely. If you're asking a question, and you *have* already
consulted the docs, the burden is on you to say so. That's a courtesy
to those who might otherwise answer your question by referring you to
documents that you've already read.
> If this board are supposed to be for proffesional programmers only,
> then it should be clearly stated somewhere.
It is certainly stated quite clearly in the FAQ that's posted twice
weekly to this newsgroup that it's considered courteous around here
not to post a question until you've used other resources first, the
first of which is the excellent documentation that's on your own
machine.
> Hauk Langlo (sticking to his books from now on)
That's your prerogative, of course, but it's a shame. If you change
your mind, and post a question that your books can't answer, you'll
probably find a lot of help here.
Finally, remember that if someone on this newsgroup offends you, you
can always add that person to your killfile. That certainly makes it
take less time to catch up on comp.lang.perl.misc!
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf/
------------------------------
Date: Mon, 17 Aug 1998 08:34:17 +0100
From: "Martin" <minich@globalnet.co.uk>
Subject: Re: Correct MIME-type?
Message-Id: <6r8mf0$3pn$1@heliodor.xara.net>
>I would hope that this far into the message, a little light has
>clicked on in your head, but if not....
>
>print "<img src="http://www.somewhere.com/somedir/image.gif">\n";
or rather
print "<img src=\"http://www.somewhere.com/somedir/image.gif\">\n";
<g> At least it's not as bad as forgetting to escape a / in a regexp.
Now who would do such a thing? ::OK, so I did::
Martin
------------------------------
Date: 17 Aug 1998 08:07:47 GMT
From: lhunter@acm.org (Larry Hunter)
Subject: Re: Docs for CGI.pm!
Message-Id: <6r8ocj$i1i$1@hiram.io.com>
In article <6r8063$v0h$1@nnrp1.dejanews.com>, dturley@pobox.com says...
>> Where can I find some documentation about the CGI.pm?
>>
>They come with CGI.pm. You can find them ont he same computer to which
you
>downloaded CGI.pm.
Or get the book. "Official Guide to Programming with CGI.pm", new this
year. The book goes beyond the documentation that comes with the module.
------------------------------------------------------------------------
Larry Hunter lhunter@acm.org http://www.io.com/~lhunter/
------------------------------
Date: Mon, 17 Aug 1998 09:58:44 -0400
From: "Brian St. Pierre" <stpierre@ttlc.net>
To: alex@digi-q.com
Subject: Re: Embedding SQL in Perl Script?
Message-Id: <35D83714.ABFCAE88@nowhere.com>
Alex -
You'll probably have more luck posting this in a perl newsgroup. This
group focusses on embedded ("firmware") programming -- not embedding one
language in another. I've reposted this to comp.lang.perl.misc for
you... best of luck.
-Brian
Alex Guberman wrote:
> Hi there,
>
> I'm a young CGI/Perl developer. I would like to write a script that
> would be a CGI Perl5 script with embeded SQL commands in it, so users
> can put and retrieve data from a mSQL database throught the web based
> interface. Does anybody have a sample of such a script?
>
> Thank you very much for you time,
>
> Regards,
> Alex Guberman
> --
> ___________________________________
>
> DIGI-Q Productions Co.
>
> Web Site: http://www.Digi-Q.com
> E-Mail: alex@digi-q.com
> Phone: (408) 252-4091
> Toll Free: (888) 55 DIGI-Q
> (888) 553-4447
> ___________________________________
>
------------------------------
Date: Mon, 17 Aug 1998 14:51:13 +0400
From: "Igorek" <garry@extech.msk.su>
Subject: GUI and Perl
Message-Id: <6r95ld$47a$1@ns.extech.msk.su>
Hi, people!
Is there any good multiplatform module
to create GUI for Perl program?
(Needed platforms: X-Windows, Windows 98)
------------------------------
Date: Mon, 17 Aug 1998 08:21:09 -0400
From: Bill 'Sneex' Jones <sneaker@sneex.fccj.org>
Subject: Re: GUI and Perl
Message-Id: <35D82035.43CAEFD@sneex.fccj.org>
Igorek wrote:
>
> Hi, people!
>
> Is there any good multiplatform module
> to create GUI for Perl program?
> (Needed platforms: X-Windows, Windows 98)
Perl/TK ???
HTH,
-Sneex- :]
__________________________________________________________________
Bill Jones | FCCJ Webmaster | Life is a 'Do it yourself' thing...
http://webmaster.fccj.org/cgi/mail?webmaster
------------------------------
Date: 17 Aug 1998 09:14:09 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: "Igorek" <garry@extech.msk.su>
Subject: Re: GUI and Perl
Message-Id: <hfzbofv2.fsf@mailhost.panix.com>
"Igorek" <garry@extech.msk.su> writes:
> Is there any good multiplatform module to create GUI for Perl
> program? (Needed platforms: X-Windows, Windows 98)
The prebuilt Win32 binary distributions at the CPAN and at Activestate
both come with the Tk GUI toolkit. The GSAR bindist uses Tk 402; the
Activestate use Tk 800. Of course, Tk will build just fine on most
Unix flavors.
http://www.perl.com/CPAN/ports/win32/Standard/x86/perl5.00402-bindist04-bc.zip
http://www.activestate.com
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf/
------------------------------
Date: 17 Aug 1998 09:09:25 -0400
From: Dan Schmidt <dfan@thecia.net>
Subject: Re: here's an implementation of diff in perl
Message-Id: <874svbzrei.fsf@razumovsky.thecia.net>
ljz@asfast.com (Lloyd Zusman) writes:
| On 16 Aug 1998 23:50:30 -0400, Mark-Jason Dominus <mjd@op.net> wrote:
| >
| > In article <ltu33c9vre.fsf@asfast.com>, Lloyd Zusman <ljz@asfast.com> wrote:
| > >Therefore, for any two lines of size N, there will be an an average
| > >of N/2 comparisons needed to determine whether or not they are
| > >equivalent.
| >
| > On any given day, you wither win the lottery or you don't. Therefore,
| > on average, in any set of N days, you will win the lottery N/2 times.
|
| Yes ... good point. I stand corrected.
|
| There are lots of ways that two lines can differ, but only one way
| that they can be identical. Given the possible set of characters that
| could fill each of the N positions of the lines, there is a very high
| probability that any two arbitrary lines will not match, and there is
| also a very good chance that this non-matchingness will be detected
| after a small number characters of the two lines have been compared.
But on the other hand, the two files that you're running diff on
probably have a whole lot of lines that are exactly identical, or
else you wouldn't be running diff.
The only kind of analysis (of how many lines match, and in what ways
the non-matching lines differ) I would trust in this case is an
empirical one.
--
Dan Schmidt -> dfan@alum.mit.edu, dfan@thecia.net
Honest Bob & the http://www2.thecia.net/users/dfan/
Factory-to-Dealer Incentives -> http://www2.thecia.net/users/dfan/hbob/
Gamelan Galak Tika -> http://web.mit.edu/galak-tika/www/
------------------------------
Date: Mon, 17 Aug 1998 12:52:06 GMT
From: dturley@pobox.com
Subject: Re: Kermit =~ /You are a LOSER. Take that stick out of your ass!/
Message-Id: <6r991m$cm9$1@nnrp1.dejanews.com>
>>>Scanning this thread for perl related issues....
>>>Scanning....
>>>Scanning complete....
>>>Scan results: NONE FOUND
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 16 Aug 1998 18:03:17 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Kermit Speaks
Message-Id: <6r76t5$i3c$2@marina.cinenet.net>
Kermit the frog (kermit@sesamestreet.com) wrote:
: Here's an interesting experiment: respond with silence to those who
: are not worthy of your knowledge...
:
: If you feel that the question posed is below you or is being asked by
: someone whom has 'not done their homework', then simply carry on to
: the next article.
...and watch clpm slowly die as it is choked with more and more pointless
nonsense. It already takes far too large a fraction of my clpm reading
time to filter out FAQs. Nope, think I'll pass. (Yes, the moderated group
is here now; if/when it really takes off, perhaps I'll abandon clpm to
those who would destroy it.)
: As for my anonymity, Mr. Gebis, I do not have time to sort through a
: thousand emails entitled 'FUCK YOU' that I'm sure I would have
: received on this hot little topic. Do you??? My karma is not at stake
: here, buddy. There was careful thought put into my commentary.
Then why do you feel the need to issue a partial retraction this morning?
: Oh, and uh, by the way, there is no need for a war of the OSes here.
Odd comment, coming from someone whose post seemed precision-crafted to
start one.
---------------------------------------------------------------------
| 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: 17 Aug 1998 13:41:08 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Kermit Speaks
Message-Id: <6r9btk$mij@fridge.shore.net>
Michael J Gebis (gebis@fee.ecn.purdue.edu) wrote:
: (Although now I am certain that I was wrong.)
Totally.
Grouch, Oscar the.
--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>
------------------------------
Date: Sun, 16 Aug 1998 14:59:10 +0200
From: "Mats Elfstrvm" <mats.elfstrom@lund.mail.telia.com>
Subject: No access for perl script?
Message-Id: <35D6D79E.9A2D19ED@lund.mail.telia.com>
Hi All.
I'm a newbie at Perl, and need some advice.
I run NT4 WKSTN and have installed AvtivePerl build 502 according to
instructions. I also run PersonalWeb Server.
Then I've set up talkshop but cannot run it from the web page
intended.
The system asks for user login and password and I am unable to figure
out where this request stems from. Perl exec are unde \Program, with
the usual Everyone access rights.
I can run talkshop.cgi from the command line and then I get proper
html code in return.
Help or tips anybody?
I know, I know, but I HAVE searched the net and FAQs but this problem
is probably too simple to be discussed.
TIA Mats.E
--
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:Email/ mats.elfstrom@lund.mail.telia.com
ICQ#9517386:
:---------------------------------------------------------------------:
:Mail/ GISKRAFT, Mats Elfstroem, Vaepplingv 21, SE-227 38 LUND,
SWEDEN:
:Phones: +46 46 145959, +46 70 595 3935
:
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
------------------------------
Date: Mon, 17 Aug 1998 09:28:33 -0400
From: Bill 'Sneex' Jones <sneaker@sneex.fccj.org>
Subject: Noise
Message-Id: <35D83001.F967C3FA@sneex.fccj.org>
dturley@pobox.com wrote:
>
> >>>Scanning this thread for perl related issues....
>
> >>>Scanning....
>
> >>>Scanning complete....
>
> >>>Scan results: NONE FOUND
>
> -----== Posted via Deja News, The Leader in Internet Discussion ==-----
> http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
Yes. Let's add to the noise!
I've always liked noiseyness :]
-Sneex-
__________________________________________________________________
Bill Jones | FCCJ Webmaster | Life is a 'Do it yourself' thing...
http://webmaster.fccj.org/cgi/mail?webmaster
------------------------------
Date: Mon, 17 Aug 1998 09:08:58 GMT
From: vucak@teco.edu (Ivica Vucak)
Subject: Re: Perl and NT and SQLServer
Message-Id: <35d7f272.7283823@kilbeggan.xlink.net>
On Fri, 14 Aug 1998 17:03:33 GMT, aschneid@cmp.com wrote:
>Where can I get a version of Perl for NT and (more importantly) where/how I
>can tap into a SQLServer 6.5 database using Perl. I use Perl 5 on solaris and
>access our Oracle database using OraPerl. Does something like that exist for
>NT/SQLServer??
You can get a binary version of Perl for Windows95/NT here:
http://www.perl.com/CPAN/ports/WIN32/Standard/x86
Get this file: perl5_00402-bindist04-bc.zip
It also contains an ODBC module with some examples.
------------------------------
Date: 17 Aug 1998 08:30:40 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Perl's equiv of "cc -DDEBUG" ?
Message-Id: <6r8png$f6e$1@client3.news.psi.net>
Andrew M. Langmead (aml@world.std.com) wrote on MDCCCXII September
MCMXCIII in <URL: news:ExtG2L.6uM@world.std.com>:
++ ez074520@dilbert.ucdavis.edu (Tomoyuki Tanaka) writes:
++
++ > what's Perl's equiv of "cc -DDEBUG" ?
++
++ > where in the C code you'd have
++
++ > #ifdef DEBUG
++ > [print stuff]
++ > #endif
++
++ Since perl does not save its intermediate format, (unlike a C
++ compiler) thre is not a feature that is exactly like that. You can
++ make use of the "constant" pragma and the fact that perl optimizes
++ away invariant branches.
++
++ use constant DEBUG => 1;
++
++ if (DEBUG) {
++ # [ print stuff ]
++ }
++
++ But there is no clean way of overriding a constant with a different
++ value on the command line.
What I sometimes do is:
use Getopt::Long;
GetOptions (\my %options,
debug:i,
....
);
my $DEBUG = defined $options {debug} ? $options {debug} || 1 : 0;
if ($DEBUG > 1) {
# Set debug in any package that has hooks.
}
# Debug messages always go to STDERR.
warn "The owls are not what they seem\n" if $DEBUG;
and call the program with --debug, or --debug 2.
Abigail
--
perl -MTime::JulianDay -lwe'@r=reverse(M=>(0)x99=>CM=>(0)x399=>D=>(0)x99=>CD=>(
0)x299=>C=>(0)x9=>XC=>(0)x39=>L=>(0)x9=>XL=>(0)x29=>X=>IX=>0=>0=>0=>V=>IV=>0=>0
=>I=>$r=-2449231+gm_julian_day+time);do{until($r<$#r){$_.=$r[$#r];$r-=$#r}for(;
!$r[--$#r];){}}while$r;$,="\x20";print+$_=>September=>MCMXCIII=>()'
------------------------------
Date: Mon, 17 Aug 1998 08:57:44 GMT
From: b_pillai@hotmail.com
Subject: Pipes on Win32
Message-Id: <6r8ra8$snp$1@nnrp1.dejanews.com>
Hi,
I am porting some scripts from UNIX to NT. The unix scripts uses
pipe, fork, dup. Is there any concept of anonymous pipes on Perl for
Win32. I would also like to know something about exec on Win32. I tried
Win32::Process but i couln't duplicate the stdin and stdout which is
one of the requirements.
Can somebody please help me.
Thanks in advance
Biju
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Mon, 17 Aug 1998 08:57:55 GMT
From: b_pillai@hotmail.com
Subject: Pipes on Win32
Message-Id: <6r8rai$snr$1@nnrp1.dejanews.com>
Hi,
I am porting some scripts from UNIX to NT. The unix scripts uses
pipe, fork, dup. Is there any concept of anonymous pipes on Perl for
Win32. I would also like to know something about exec on Win32. I tried
Win32::Process but i couln't duplicate the stdin and stdout which is
one of the requirements.
Can somebody please help me.
Thanks in advance
Bilio
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 17 Aug 1998 10:04:48 GMT
From: Stefaan.Eeckels@ecc.lu (Stefaan A Eeckels)
Subject: Re: Q: How to read all the file name in a directory
Message-Id: <6r8v80$3rf$1@justus.ecc.lu>
In article <35D5958F.7AC9@iowegian.com>,
Grant Griffin <grant.griffin@iowegian.com> writes:
> In an ideal world, any given gizmo would be so easy to use that nobody
> would _have to_ read the manual! (Not that Windows is even remotly
Frankly, this is one of the silliest statements I have heard
in a long time.
> _close_ to that goal.) For example, I just bought a new car. Do I want
> to read the manual? No. Did I have to? Yes. The people who designed
> the car screwed up.
Design a system even an ignoramus can use, and you'll find
only ignorami will want to use it ;-)
--
Stefaan
--
PGP key available from PGP key servers (http://www.pgp.net/pgpnet/)
___________________________________________________________________
Perfection is reached, not when there is no longer anything to add,
but when there is no longer anything to take away. -- Saint-Exupery
------------------------------
Date: 17 Aug 1998 07:28:42 GMT
From: gebis@fee.ecn.purdue.edu (Michael J Gebis)
Subject: Re: Q: How to read all the file name in a directory
Message-Id: <6r8m3a$rkj@mozo.cc.purdue.edu>
fl_aggie@thepentagon.com (I R A Aggie) writes:
}So, Lloyd, how's the Perl Helpdesk going?
There are choices other than "flame" and "helpdesk."
--
Mike Gebis gebis@ecn.purdue.edu mgebis@eternal.net
------------------------------
Date: Sun, 16 Aug 1998 10:14:58 -0400
From: aderoy@mnsi.net
Subject: Re: Recommend a good editor
Message-Id: <35d6e9ab$1$nqrebl$mr2ice@snews.mnsi.net>
In <6r2lf5$cga$1@nnrp1.dejanews.com>, on 08/15/98
at 12:41 AM, dturley@pobox.com said:
>In article <6r1qlj$90f@sjx-ixn1.ix.netcom.com>,
> "Steve Bohler" <skbohler@sprynet.com> wrote:
>> I've searched through previous posts, but am not finding a recommendation
>> for an easy-to-use Perl editor that runs on Windows.
Try vedit at www.vedit.com they have a trial available. Works under DOS
and/or Windows. Small, fast and configurable with syntax highlighting
-----------------------------------------------------------
aderoy@mnsi.net
-----------------------------------------------------------
------------------------------
Date: Mon, 17 Aug 1998 13:33:00 GMT
From: news4jim@my-dejanews.com
Subject: Re: Recommend a good editor
Message-Id: <6r9bec$fem$1@nnrp1.dejanews.com>
In article <6r30n6$ep0$1@msunews.cl.msu.edu>,
Dan Nguyen <nguyend7@msu.edu> wrote:
> In comp.lang.perl.misc Steve Bohler <skbohler@sprynet.com> wrote:
> : I've searched through previous posts, but am not finding a recommendation
> : for an easy-to-use Perl editor that runs on Windows. I've used emacs
> : before, but was wondering if there was something better.
>
> What could be better than emacs?
I swear by Textpad:
www.textpad.com
--
deadlock Design Ltd. <http://deadlock.com/>
Promotion: <http://deadlock.com/promote/>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 16 Aug 1998 18:07:51 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Reference Confussion
Message-Id: <6r775n$i3c$3@marina.cinenet.net>
ruben@wynn.com wrote:
: I'm trying to create a complex data structure using references. But the perl
: compiler is giving me an error message I don't understamd.
:
: The code is:
:
: snip ------
: %build{ cols => [],
: tabs=>[],
: where=>[]->{ left_column =>\$where_left,
: ops => \$where_ops,
: right_values =>\$where_right,
: bool => \$where_cont
: },
Change 'where=>[]->' to just 'where=>' and you should be OK. (Not sure
what you were trying to do with that...is 'where' meant to be a reference
to a hash (my guess) or a reference to an array of references to hashes?
If the latter, the syntax is different...followup if you need that.)
: "sort" => \$order
: };
: snip-------
:
: The error message is:
:
: Can't use subscript on hash deref at ./patients.cgi.1.0.1 line 12, near
: "$order }" (Did you mean $ or @ instead of %?)
The problem is in the previous lines.
---------------------------------------------------------------------
| 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, 3 Aug 1998 21:58:10 -0300
From: "Fernando Nemec" <fnemec@sti.com.br>
Subject: Run Perl5 in Win95
Message-Id: <6q5moq$39t$1@news.sti.com.br>
Hi All!
Can I run Perl Scripts under Windows95?
If yes, how I can do it?
Thanks All!
Fernando Nemec
fnemec@sti.com.br
So Paulo - Brazil
P.S.: I have installed a Web Server " OMNI HTTPD".
------------------------------
Date: Mon, 17 Aug 1998 15:17:28 +0100
From: James O Flynn <j8flynn@hursley.ibm.com>
Subject: su on NT
Message-Id: <35D83B78.A54E8CE3@hursley.ibm.com>
New to using perl on NT and I need to be able to start
jobs with particular uids and gids.
How do I:
unless ( fork )
{
$UID = "user";
$GID = "group";
exec( "script" );
}
???
With the deamon running as a service set up by administrator?
Cheers,
James.
--
4920616d206e6f742061206e756d62657221
------------------------------
Date: Mon, 17 Aug 1998 13:32:34 GMT
From: b_redeker@hotmail.com
Subject: unpack question
Message-Id: <6r9bdi$feg$1@nnrp1.dejanews.com>
does anyone know this one? I found in a clpm-discussion the command unpack,
and found an immediate use for it. However there is one thing I don't get.
#My Data: aa1.2 bb1234567890 cc1 dd1.234 #read lines while ($line=<IN>) {
@stuff = unpack("A2A3", $line); print "$line -> @stuff\n"; }
now this produces neat results, but who can explain to me what happens
if I use unpack ("A2f3", $line);
^
I get some floating point numbers which seem to have no relation with the data
given. Anyone who knows what happens and why?
--
Boudewijn
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Mon, 17 Aug 1998 21:54:50 +1000
From: "Craig Nuttall" <admin@kewl.com.au>
Subject: Re: verify password
Message-Id: <6r95mf$19v$1@nswpull.telstra.net>
<tigger@io.nospaam.com> wrote in message
6r4d7g$hmh$2@hiram.io.com...
>
>> Actually, the kernel *has* to allow setuid scripts to work, or
your /bin/passwd
>> program would never work. However, it is possible to mount a
filesystem so that
Thanks Paul,
I have checked the mounts, and all are listed ext2 (rw) so
unfortunately, I
appear to be no further ahead :-(
Kind regards
Craig
------------------------------
Date: Mon, 17 Aug 1998 08:20:21 -0400
From: Bill 'Sneex' Jones <sneaker@sneex.fccj.org>
Subject: Re: verify password
Message-Id: <35D82005.3DC9E73B@sneex.fccj.org>
Craig Nuttall wrote:
>
> <tigger@io.nospaam.com> wrote in message
> 6r4d7g$hmh$2@hiram.io.com...
> >
> >> Actually, the kernel *has* to allow setuid scripts to work, or
> your /bin/passwd
> >> program would never work. However, it is possible to mount a
> filesystem so that
>
> Thanks Paul,
>
> I have checked the mounts, and all are listed ext2 (rw) so
> unfortunately, I
> appear to be no further ahead :-(
>
> Kind regards
> Craig
Actually,
62315 -r-sr-xr-x 1 root bin 15613 Apr 27 12:29 /usr/bin/passwd
is setuid.
Also, if you want a hint on what you can do, see
http://webmaster.fccj.org/Webmaster/WebPass.html
(you can find others by searching under the Security
category at http://www.perl.com ...)
HTH,
-Sneex- :]
__________________________________________________________________
Bill Jones | FCCJ Webmaster | Life is a 'Do it yourself' thing...
http://webmaster.fccj.org/cgi/mail?webmaster
------------------------------
Date: Mon, 17 Aug 1998 02:09:57 -0400
From: Daniel <ghia@telerama.lm.com>
Subject: Re: win32 printing
Message-Id: <35D7C934.D9FCDD8@telerama.lm.com>
Here is some text off my web site (www.telerama.com/~ghia) that covers that
very question:
If you ever need to send information to the LPT1 in Perl here is the code to
do it:
open( LPT, "+>LPT1" ) or die "Can't access printer: $!";
Then to print a line of text no the printer just use it as a file handle:
print LPT "Text to print\n";
NOTE: Remember to add a form feed character or your printer will just sit
there and look at you, holding onto the paper, (on my Win32 machine this is a
^L ASCII 012)
As for the bonus question, I have no clue. I'm sure there is a way (there is
always a way) but I can't give you the answer for it.
"The" Daniel
Neil Kandalgaonkar wrote:
> Using perl on win32, how can I send a text file to the printer? (The
> printer is HP, non-postscript).
>
> Bonus question: Could I do better than a monospace text file dump? Simple
> line drawing and proportional fonts would be great.
------------------------------
Date: Mon, 17 Aug 1998 08:02:54 -0400
From: Bill 'Sneex' Jones <sneaker@sneex.fccj.org>
Subject: Re: win32 printing
Message-Id: <35D81BEE.497D09DA@sneex.fccj.org>
Daniel wrote:
>
> Here is some text off my web site (www.telerama.com/~ghia) that covers that
> very question:
>
> If you ever need to send information to the LPT1 in Perl here is the code to
> do it:
>
> open( LPT, "+>LPT1" ) or die "Can't access printer: $!";
>
> Then to print a line of text no the printer just use it as a file handle:
>
> print LPT "Text to print\n";
>
> NOTE: Remember to add a form feed character or your printer will just sit
> there and look at you, holding onto the paper, (on my Win32 machine this is a
> ^L ASCII 012)
>
> As for the bonus question, I have no clue. I'm sure there is a way (there is
> always a way) but I can't give you the answer for it.
>
> "The" Daniel
>
> Neil Kandalgaonkar wrote:
>
> > Using perl on win32, how can I send a text file to the printer? (The
> > printer is HP, non-postscript).
> >
> > Bonus question: Could I do better than a monospace text file dump? Simple
> > line drawing and proportional fonts would be great.
PMFJI: :]
I am pretty sure that I saw a PCL5 printer module/script
around the Internet somewhere...
However, a while back (in the eighties) I wrote several sub-
routines in PCL5 so that I could both print and draw minor
graphics using Progress 4GL v6 (RDBMS) on a CTOS server.
I have been, in my spare time, playing with some of them using
Perl. I will post a URL in a couple of weeks where interested
parties can download example code.
-Sneex-
__________________________________________________________________
Bill Jones | FCCJ Webmaster | Life is a 'Do it yourself' thing...
http://webmaster.fccj.org/cgi/mail?webmaster
PS - For those of you who don't know what CTOS is/was:
It's what Unix should have been during the early eighties
and what DOS should have always been :]
------------------------------
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 3462
**************************************
