[6799] in Perl-Users-Digest
Perl-Users Digest, Issue: 424 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon May 5 01:07:21 1997
Date: Sun, 4 May 97 22:00:25 -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 Sun, 4 May 1997 Volume: 8 Number: 424
Today's topics:
Re: @r=($a=~/./g) Sets @r to the list of matching eleme <ajohnson@gpu.srv.ualberta.ca>
Re: @r=($a=~/./g) Sets @r to the list of matching eleme (Tad McClellan)
[ANNOUNCE] PATROL CGI Server BETA Available for Downloa <rweb@swbell.net>
Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-p (Tung-chiang Yang)
Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-p (Tung-chiang Yang)
Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-p (Tad McClellan)
Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-p (I R A Aggie)
Re: Combining 2 GIFs in Perl? (Brian Lavender)
Comm.pl bsautter@get-it.net
Re: Help Use 1 file to edit another <reriksso@cc.helsinki.fi>
Re: How to run Perl scripts directly from netscape on a <zonycat@flash.net>
Inserting list item into HTML bullet list.... <jakeller@ucsd.edu>
need help w/forms and Perl (Peter Wood)
Re: Newbie confused by all those slashes (Eric Bohlman)
Re: Notice to antispammers (Michael Shields)
Re: opendir and mkdir in dos perl...Please Help.. (Ilya Zakharevich)
output format <mkull@io.com>
Re: Perl auto-replier (I R A Aggie)
Perl on NT Servers <giblin@mail.idt.net>
Perl or 'C'???? (Simba)
PERL::ODBC <brian@shepmark.com>
Re: Pointing a Filehandle _AT_ a Subroutine <chaim@nlk.nlk.com>
Re: problems receiving lines from modem (Jordyn A. Buchanan)
scientific notation compare bug (Ian Morgan)
Re: Time Question... (Broc Seib)
Urgent help needed! State abbreviation conversion <tsimms@intr.net>
Re: Urgent help needed! State abbreviation conversion <zonycat@flash.net>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 03 May 1997 12:28:28 -0500
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: @r=($a=~/./g) Sets @r to the list of matching elements
Message-Id: <336B75BC.54913A81@gpu.srv.ualberta.ca>
Etienne Grossmann wrote:
>
> Is the fact that
>
> @r=($a=~/./g) Sets @r to the list of matching elements
>
> a normal perl feature? (I did not see it in the man pages)
>
> Etienne
yup, its a normal feature:
from the blue camel p71;
"The /g modifier specifies global pattern matching
...[snip]. How it behaves depends on context. In a list
context, it returns a list of all the substrings matched
by all the parentheses in the regular expression. If
therre are no parentheses, it returns a list of all the
matched strings, as if there were parentheses around the
whole pattern."
regards
andrew
------------------------------
Date: Sat, 3 May 1997 18:21:06 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: @r=($a=~/./g) Sets @r to the list of matching elements
Message-Id: <29hgk5.pk2.ln@localhost>
Andrew Johnson (ajohnson@gpu.srv.ualberta.ca) wrote:
: Etienne Grossmann wrote:
: >
: > Is the fact that
: >
: > @r=($a=~/./g) Sets @r to the list of matching elements
: >
: > a normal perl feature? (I did not see it in the man pages)
: >
: > Etienne
: yup, its a normal feature:
: from the blue camel p71;
: "The /g modifier specifies global pattern matching
: ...[snip]. How it behaves depends on context. In a list
: context, it returns a list of all the substrings matched
: by all the parentheses in the regular expression. If
: therre are no parentheses, it returns a list of all the
: matched strings, as if there were parentheses around the
: whole pattern."
and the same verbage is also in the free documentation that is included
with the perl distribution, in the perlop man page, under:
=item m/PATTERN/gimosx
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Sun, 04 May 1997 10:39:53 -0400
From: Richard Webster <rweb@swbell.net>
Subject: [ANNOUNCE] PATROL CGI Server BETA Available for Download
Message-Id: <336C9FB9.13BE@swbell.net>
From: rbraddy@bmc.com
Subject: [ANNOUNCE] PATROL CGI Server BETA Available for Download
SERIOUS CGI'ers:
If you're using CGI for serious or mission-critical Web applications,
including intranet, extranet or E-Commerce applications, you'll
probably want to at least be aware of BMC Software's new, revolutionary
CGI utilities, available for download at:
http://www.bmc.com/
http://www.bmc.com/cgiserver
Check out these high-performance, mission-critical CGI application
utilities from BMC Software, announced on April 21, 1997. The following
is a brief summary. See the www.bmc.com web site for details.
1) PATROL CGI Analyzer: JAVA-based tool generates CGI and HTML loads,
plotting performance of each with various concurrent CGI requests. This
is a must-have JAVA applet if you want to know how your CGI applications
scale with increasing numbers of concurrent users, as well as showing
you
exactly how increasing CGI loads impact your Web server's ability to
serve
HTML pages, handle SLL encryption/decryption and authentication loads,
serve images and applets, etc. This analyzer utility is included with
the
PATROL CGI Server package, and can be used with or without PATROL CGI
Server.
2) PATROL CGI Server: Distributed CGI utilities, providing:
High-availability, Fault-tolerant CGI.
Scalable performance (scale CGI performance up to 5 times or more).
Offload your Web server of CGI load, making home pages fast, even with
full CGI loads.
Enable "Extranet" use of CGI; CGI Broker authenticates through firewalls
to CGI, enabling CGI applications on intranet to be shared over
Internet.
Application Servers; now you can share a CGI Application server on both
the intranet and Extranet; your Web server can run on one host, and your
CGI's on one or more others, even if the platforms are different.
Enables heterogenous platforms; e.g., Solaris as CGI application server,
NT as Web server (or vice versa).
Allows use of PERL, TCL, JAVA, etc. without worry about performance and
scalability issues as application complexity and size grows over time.
CGI 1.1 interface compliant. Runs most CGI applications unmodified.
Browser-based Configuration and Admin. interface (like you get with Web
servers) makes it easy to administer.
Available for Windows NT, Sun Solaris HP-UX operating systems, and
Netscape and Microsoft Web servers. Apache coming ...
Just wanted to make sure that everyone who is serious about CGI that
needs
to know has the opportunity to learn about and participate in the Beta
program.
Hope this helps. Happy CGI'ing!
Rick Braddy
rbraddy@bmc.com
------------------------------
Date: Sat, 3 May 1997 21:47:12 GMT
From: tcyang@netcom.com (Tung-chiang Yang)
Subject: Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-process,programmer,regex}
Message-Id: <tcyangE9MKIo.GMu@netcom.com>
Well, right now I am working on robomoderation of
"soc.culture.taiwan.moderated", and I encounter this problem. You can
say with 97% confidence that "soc.culture.xxx" is more flame-oriented
than CLPM and more people will believe in "moderation = censorship",
but judging from the recent Tom incident about munging addresses, I
found that CLPM does not lack this kind of people.
Personally I do support a moderation or robomoderation of some newsgroups
under CLP. However, I just tried to remind you that you had better
present some statistics to convince people. Unfortunately, people not
in CLPM can also vote yes or no on the proposal, and they might cast
the votes without reading CLPM at all (maybe they do not know Perl) but
just based on their feelings of "moderation/antimoderation". Say, people
who like to post "Perl vs. TcL" might be the people who will cast "no"
for your proposal. They will feel "they lose something" if CLPM is
moderated.
A friend of CLPM posted regularly statistics about CLPM, and I found that
to be a good idea. I wrote a similar Perl program and grab statistics
for SCTaiwan for presenting the crossposting statistics. Maybe you want
to do similar things for CLPM, say, the statistics about CGI/WWW posts
here.
P.S. I am usually overcareful for things, so maybe you can safely ignore
my reminder :)
==========================================
A.Deckers (I-hate-cyber-promo@man.ac.uk) wrote:
: In comp.lang.perl.misc,
: tcyang@netcom.com wrote:
: >You forgot one thing. To create these groups, you have to win supports
: >for more than CLPM people. There are elementary people who always believe
: >"moderation = censorship". Present an explanation for these people first.
: Anyone who rants about the censorship issue in the context of a RFD for
: a technical group such as those proposed is probably a raving lunatic
: and therefore beyond reasoning, gruboursy being a case in point.
: I'm sure some will crawl out of the woodwork when the official RFD is
: published, but I doubt there is anything we can say to change their
: point of view, they will probably be very few and I have better things
: to do than to waste my time in puerile shouting matches.
: I guess I'm agreeing with you but I don't think this is anything to
: worry about in this case. All we can do is point them towards the
: rationale, which IMHO makes clear why moderation is desirable, and hope
: that the vast majority of news.groups and clpm regulars will make a
: sensible reading of this.
--
Tung-chiang Yang tcyang@netcom.com
soc.culture.taiwan, soc.culture.china (by SCC FAQ Team) FAQ's:
http://www.clever.net/tcyang/Taiwan_faq.shtml, China_faq.shtml
------------------------------
Date: Sun, 4 May 1997 05:05:47 GMT
From: tcyang@netcom.com (Tung-chiang Yang)
Subject: Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-process,programmer,regex}
Message-Id: <tcyangE9n4tn.6xJ@netcom.com>
It is an honor that Tad follows up my posts as I know too little about Perl
:)
Kooks are everywhere. People tend to resist any changes/improvements
to form any newsgroup which they cannot post freely because they feel their
"freedom" is limited while in the past they were not limited at all.
Few people will take into account that this forms new groups which do not
affect their "original" rights to flame in CLPM.
This deals with psychology :)
================================
Tad McClellan (tadmc@flash.net) wrote:
: The proposal does not change clpm *at all*. They won't lose anything
: because clpm will still be there exactly as it is today.
: clpm will still be there for:
: 1) re-asking of Frequently Asked Questions, ensuring that the 'F'
: in FAQ is accurate ;-)
: 2) philosophical debates not at all related to Perl.
: 3) asking of off-topic CGI questions.
: 4) advertisements
: 5) flaming of regulars by first time posters
: Which would seem to cover 80-90% of the postings recently...
: The proposal is only for *additional* newsgroups. It changes the
: current ones not at all.
--
Tung-chiang Yang tcyang@netcom.com
soc.culture.taiwan, soc.culture.china (by SCC FAQ Team) FAQ's:
http://www.clever.net/tcyang/Taiwan_faq.shtml, China_faq.shtml
------------------------------
Date: Sat, 3 May 1997 18:51:54 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-process,programmer,regex}
Message-Id: <q2jgk5.hq2.ln@localhost>
Tung-chiang Yang (tcyang@netcom.com) wrote:
: Personally I do support a moderation or robomoderation of some newsgroups
: under CLP. However, I just tried to remind you that you had better
: present some statistics to convince people. Unfortunately, people not
: in CLPM can also vote yes or no on the proposal, and they might cast
: the votes without reading CLPM at all (maybe they do not know Perl) but
: just based on their feelings of "moderation/antimoderation". Say, people
: who like to post "Perl vs. TcL" might be the people who will cast "no"
: for your proposal. They will feel "they lose something" if CLPM is
^^^^^^^
: moderated.
^^^^^^^^^
The proposal does not change clpm *at all*. They won't lose anything
because clpm will still be there exactly as it is today.
clpm will still be there for:
1) re-asking of Frequently Asked Questions, ensuring that the 'F'
in FAQ is accurate ;-)
2) philosophical debates not at all related to Perl.
3) asking of off-topic CGI questions.
4) advertisements
5) flaming of regulars by first time posters
Which would seem to cover 80-90% of the postings recently...
The proposal is only for *additional* newsgroups. It changes the
current ones not at all.
: ==========================================
: A.Deckers (I-hate-cyber-promo@man.ac.uk) wrote:
: : In comp.lang.perl.misc,
: : tcyang@netcom.com wrote:
: : >You forgot one thing. To create these groups, you have to win supports
: : >for more than CLPM people. There are elementary people who always believe
: : >"moderation = censorship". Present an explanation for these people first.
[ snip Alain Deckers' followup ]
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Sat, 03 May 1997 18:17:59 -0500
From: fl_aggie@hotmail.com (I R A Aggie)
Subject: Re: [DRAFT] RFD: comp.lang.perl.{data-structure,inter-process,programmer,regex}
Message-Id: <fl_aggie-ya02408000R0305971817590001@news.fsu.edu>
In article <5kcpt3$eqt@pirate.shu.edu>, dblack@icarus.shu.edu (David Alan
Black) wrote:
+ tadmc@flash.net (Tad McClellan) writes:
+ >I think the provision is not meant to exclude HTML as _contents_
+ >but to exclude HTML encoding of the entire post itself (eg.
+ >posting from a misconfigured Netscrape).
+ That sounds right - I was envisioning it being done automatically,
+ based on a scan of the text, and therefore possibly prone
+ to over-doing. Which probably makes no sense anyway....
Why bother scanning the text for such a munged post? Nyetscape was
nice enough to give us a tag to filter on:
Content-Type: multipart/alternative
AFAIK, only html/plain text post combos have this tag.
James
--
Consulting Minister for Consultants, DNRC
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: Sun, 04 May 1997 04:59:49 GMT
From: brian@brie.com (Brian Lavender)
Subject: Re: Combining 2 GIFs in Perl?
Message-Id: <336c16c4.14046787@nntp.netcruiser>
Posted at comp.lang.perl.misc and emailed
Steve,
Get GD
http://www.boutell.com:80/gd/
which is ported to win32 and the GD.pm module and it is a piece of
cake. I use it on my site
http://www.brie.com/bbd
for drawing the location of the business on the map which is exactly
along the line of what you are talking about.
Brian
----------------
Brian Lavender
Brie Web Publishing
Owner
Napa, CA
(707) 226-8891
Brie Business Directory - Napa Valley http://www.brie.com/bbd
"Sometimes our only obstacle is the one in our minds."
On Fri, 02 May 1997 09:15:02 -0700, galfano@ucla.edu (Steven Galfano)
wrote:
>Hi, everyone!
>
>(I am running PERL on WinNT 4.0)
>
>I have 5 images - a background, and possible five layers to go on top. I
>would like to let the user decide which layers to see on top of the
>background, and then give the the customized output...
>
>I was hoping (although I knew it wouldn't be that easy) that I could just
>print one GIF file after the other (see my loser code below). Nope -
>didn't work.
>
>Anyone know a way of conquering this? Are GIFs combinable?
>
>Thanks a lot!
>
>-Steve
>
>-------- The loser code --------
>
>$CHUNK_SIZE = 4096;
>
>print "Content-type: image/gif\n\n";
>
># print the background image
>
>open( MY_FILE, "../images/background.gif" );
>binmode( MY_FILE ); # Love that WinNT
>binmode( STDOUT ); # Love that WinNT
>while ( $cb = read( MY_FILE, $data, $CHUNK_SIZE ) )
>{ print $data; }
>close( MY_FILE );
>
># print the first layer
>
>open( MY_FILE, "../images/1.gif" );
>binmode( MY_FILE ); # Love that WinNT
>binmode( STDOUT ); # Love that WinNT
>while ( $cb = read( MY_FILE, $data, $CHUNK_SIZE ) )
>{ print $data; }
>close( MY_FILE );
------------------------------
Date: Sat, 03 May 1997 19:33:12 -0600
From: bsautter@get-it.net
Subject: Comm.pl
Message-Id: <862705297.27537@dejanews.com>
Does anyone know of some good on-line or book
material with details on how to use comm.pl
or other associated modules?
Benjamin Sautter
bsautter@get-it.net
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: 04 May 1997 00:11:38 +0300
From: era eriksson <reriksso@cc.helsinki.fi>
To: mhammer@execpc.com
Subject: Re: Help Use 1 file to edit another
Message-Id: <p20g1w4z2et.fsf@kruuna.Helsinki.FI>
On Thu, 01 May 1997 17:59:47 -0500, Mike Hammernik
<mhammer@execpc.com> posted to comp.unix.shell, comp.lang.perl.misc:
> Hello
> I would like to cat a file and use each line in that file to delete a
> line in another file. My scenario is having a file with 1744 lines. I
> want to delete lines in a file of 16000 lines that contains the first 2
> fields in file_1. The files are in a load/unload format from a db.
man join
You will need to sort the data and you may have to glue the two fields
together to form a single key field. Just tack that in front of the
actual data, like so:
moo|key1|key2|bar|foo|baz
=>
key1key2|moo|key1|key2|bar|foo|baz
then remove the first field after the join.
Hope this helps,
/* era */
Followups set to comp.unix.shell
--
Defin-i-t-e-ly. Sep-a-r-a-te. Gram-m-a-r. <http://www.iki.fi/~era/>
* Enjoy receiving spam? Register at <http://www.iki.fi/~era/spam.html>
------------------------------
Date: Sun, 04 May 1997 18:56:45 -0700
From: Dennis <zonycat@flash.net>
Subject: Re: How to run Perl scripts directly from netscape on a local PC ? (CGI Scripts)
Message-Id: <336D3E5D.118E@flash.net>
Erik Paardekooper wrote:
>
> On my work I create Perl programs, which I can directly access with my
> internet browser.
>
> Now I want to do this the same at home on my local Windows95 PC. The
> only way to look at the output with my browser, is to redirect the
> output of the Perl program to a HTML file and read this file into my
> browser.
> They told me I needed a webserver environment to do this (and work with
> partitions). Who can supply me with information how to do this ?
>
> Thanks !
> Erik from Lisse - Holland
I would like to add to Erik's question. I am having trouble with my CGI
Scripts. When they run it asks for name-value pairs. It thinks it is
in 'offline' mode. DO I need to do more tham associating cgi,pl with the
application perl? I moed CGI.pm to the perl\lib directory and my script
to \bin directory?
Documentation is weak in the area of Win95 and NEtscape or even MS
Explorer.
------------------------------
Date: Sun, 04 May 1997 19:57:44 -0800
From: "Jeff Keller" <jakeller@ucsd.edu>
Subject: Inserting list item into HTML bullet list....
Message-Id: <jakeller-0405971957440001@dt6h3n83.san.rr.com>
Ok, I'm trying to both learn Perl and save myself time in the same weekend and I've run across some difficulties ;-)
What I'm trying to do is write a Perl script to automatically add and delete people from the high school alumni list I've kept for the past several years..
I can get it to delete people just fine.. but when I want to add someone's entry, I want it to go in the right spot alphabetically.. but I can't even think of a logical way to do it, let alone use Perl to do it <grin>
An example of the page I'd want to add an entry to is:
http://lostworld.pair.com/smhs/years/1994.html
Say I want to have the script put in "Bob Jones '96 (and all that follows)" -- it needs to go in the right place!
So if anybody can help, or if you need more info, don't hesitate to write me at jakeller@ucsd.edu -- if you post publicly here be sure to copy me in on the message too..
Many thanks --
Jeff Keller
._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._
Jeff Keller
University of California, San Diego
Webmaster, UCSD Bookstore ---------> http://www-bookstore.ucsd.edu
Webmaster, PowerWatch -------------> http://www.powerwatch.com
Personal Home Page ----------------> http://lostworld.pair.com
E-mail address --------------------> jakeller@ucsd.edu
------------------------------
Date: Sat, 03 May 1997 22:33:09 -0400
From: peter.wood@axom.com (Peter Wood)
Subject: need help w/forms and Perl
Message-Id: <peter.wood-ya023580000305972233090001@n5.supernews.com>
Hello,
I am working on a project in which I have a list of service orders for our
company. This is a list in table form, with each row representing a
specific service order, with information on service order number, customer,
description, etc.
I am using Perl right now, because that's what I know.
What I would like to do is have two buttons next to each row - one called
"modify" and one called "close" - which would do the appropriate actions on
service orders. Also there would be a button at the bottom to open a new
service order.
This is the intended final form anyway.
The way I have it now is this: Each entry in the list has a radio button
next to it, where the value of the button is the service order number,
which is coded into the button when the HTML is generated from a raw data
file. These buttons are one set of buttons named "thenum." Then, at the
bottom, there is another set of radio buttons named "userchoice." The
users selects either modify, close, or open. After selecting one of these,
and "thenum" of the service order number above, they submit the form. The
script takes the "userchoice" and decides what form to send the user to
next, passing "thenum" along with it to be placed into the appropriate spot
on the form.
This works pretty much as it should. However, it's really supposed to be a
one-click approach. What I want to know is, how can I do this? Is there
anyway I can have a single-clickable button that is encoded with two
values, so that rather than using three clicks, a user would look at the
list, click a button, and be taken away?
I know this might sound complicated but it is important, and right now, I'm
stuck with the clumsy three-click approach.
I have considered JavaScript, but right now I'm more concerned with getting
the project done, and don't have time to learn a new language.
Anyone with words of wisdom is welcome to submit them to my email address.
I can try and give you a more detailed description. I might be able to
provide you with some code portions, but not all...got to keep at least one
or two industrial secrets, eh? :)
Thanks,
Peter
Peter R. Wood, Technical Support <*--Axiom Technologies, Inc.--*>
mailto:peter.wood@axom.com http://www.axom.com/ http://www.axom.com/~pwood/
------------------------------
Date: Sun, 4 May 1997 01:59:28 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Newbie confused by all those slashes
Message-Id: <ebohlmanE9Mw74.JHG@netcom.com>
Tad McClellan (tadmc@flash.net) wrote:
: I'm most certainly not a Perl guru, but I'll answer it anyway ;-)
: if ( $values[2] =~ /$prodname/ ) ...
: =~ "binds" the string to search in ($values[2]) to the
: pattern to search for (/$prodname/).
Surely you meant
if ( $values[2] =~ /\Q$prodname\E/ ) ...
so that a query for "Microsoft Visual P++" would match properly.
------------------------------
Date: 5 May 1997 04:47:24 -0000
From: shields@crosslink.net (Michael Shields)
Subject: Re: Notice to antispammers
Message-Id: <5kjoos$bgb$1@daedalus.crosslink.net>
In article <r5ohatmram.fsf@tvmaster.turner.com>,
Mike Campbell <mcampbel@tvmaster.turner.com> wrote:
> Yes, and his little parting bombshell is analogous to deathbed
> confessions - they serve only to pacify one's self and cause heartache
> to all those around. It was a childish move, but being that Tom's
> behaviour for the past few months has become more and more moody and
> infantile, not totally unexpected.
Tom Christiansen wrote thousands of helpful Usenet articles, many of them
answering the same questions over and over and over, until eventually
he was unable to bear the weight of human stupidity. Singlehandly he
posted a substantial portion of the signal in c.l.p and later c.l.p.m.
What gives you the right to insult him?
--
Shields, CrossLink.
------------------------------
Date: 5 May 1997 03:07:32 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: opendir and mkdir in dos perl...Please Help..
Message-Id: <5kjitk$isj$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Chris Everett
<everett@msms.doe.k12.ms.us>],
who wrote in article <336B7113.405B@msms.doe.k12.ms.us>:
> I am having a problem with a script that i am writing in dos perl.
> Opendir always returns a true whether the dir is there or not, so i can
> not test for the dir to mk it if it is not there. Any ideas here? Also
> mkdir does not work, it just doesn't make anything. Any ideas?
Using some broken port? Laters one is 5.003_93 (aka 5.004beta1).
Ilya
------------------------------
Date: Sun, 04 May 1997 00:10:50 -0700
From: Max Kull <mkull@io.com>
Subject: output format
Message-Id: <336C367A.2BA1@io.com>
Question from a new user. I'm trying to print out baseball batting
averages...... .305, .274, etc. I can't figure out in Perl how to
suppress the leading zero (0.305, 0.274, etc.). Suggestions would be
appreciated.
Thanks,
Max Kull
------------------------------
Date: Sat, 03 May 1997 18:40:47 -0500
From: fl_aggie@hotmail.com (I R A Aggie)
Subject: Re: Perl auto-replier
Message-Id: <fl_aggie-ya02408000R0305971840470001@news.fsu.edu>
In article <33712301.4632222@news.cent.com>, jp@here.com (jp) wrote:
+ And as far as calling them clueless, those of you that think you can
+ answer the questions of the clueless, remember something, you once
+ were clueless too.
Yes, I was. But I usually looked things up FIRST. And then, if I
didn't understand, I would ask a question. The Camel/Llama books
both come with an index, and the standard perl distribution comes
with several megabytes of documentation which can also be searched.
There is also a Acrobat version of the docs, which once again can
be searched.
Most people in industrialized nations have been taught how to use
an index properly by the time they turn 12. Yet they mysteriously
lose this ability once they discover Usenet??
+ Most of you, when you do answer a question, only appear to know very
+ little yourselves. You never seem to get a grasp of what the person
+ realy wants to know and you rarely give the best answer to suit their
+ needs. So perhaps we are all a little clueless. ?
Perhaps they are incapable of wording their question in a clear and
consise manner? For instance:
Q? How do I compile my perl program?
has many potential meanings. Are they asking about the perl compiler?
are they asking about how they go about using udump to get binary image
of their program? are they asking about the standard unix way? perhaps
a DOS version? or maybe a windoze version? how about the mac version?
I think the most up-to-date version of the perl FAQ and metaFAQ should
be included in the perl documentation.
James - yes, I know, they won't use it, but we can pointedly point them
to them...
--
Consulting Minister for Consultants, DNRC
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: Sat, 03 May 1997 23:20:26 -0400
From: John Giblin <giblin@mail.idt.net>
Subject: Perl on NT Servers
Message-Id: <336C007A.12CC@mail.idt.net>
Hey all,
I just moved from a unix to a NT Server. I have change the ext. to .pl,
but when I hit the submit button it asks me where to save the script.
Do I have to do anything else?
--
===============================================================================
John W Giblin
Axis New York-Bar & Restaurant Guide
For your chance to Win Knicks Playoff Tickets
http://www.axisny.com
Mailto:giblin@mail.idt.net
===============================================================================
------------------------------
Date: Mon, 05 May 1997 05:06:27 GMT
From: toeknee@doitnow.com (Simba)
Subject: Perl or 'C'????
Message-Id: <5kjmdu$74k@in2.doitnow.com>
Hi all,
I need to start writing CGI scripts. I already have 'C' experience. Is
it worth it to learn Perl??? Or just stick with 'C'?
Views, opinions, comments??? PLEASE!!
--------------------------------------------------------------------------------
> > > > > >> ToeKnee << < < < < <
--------------------------------------------------------------------------------
http://freedomstarr.com/?SI1016591
------------------------------
Date: 3 May 97 13:58:55 GMT
From: "Brian Shepard" <brian@shepmark.com>
Subject: PERL::ODBC
Message-Id: <01bc57d3$401894c0$2a54eccd@default>
# Does anybody see the problem with the following script. It is not
inserting any values into the table. I am not getting an error and when I
use the dumperror method I do not get a error. I am using Microsoft Access
for a database with NT. Any help would be appreciated.
thanks
Brian Shepard, ShepMark
(416) 267-5985
email: brian@shepmark.com WWW: http://www.shepmark.com
Mail: 18 Ridgemoor Ave, Scarborough, Ontario, Canada M1N 1M4
#***************************************************************************
*******
use Win32::ODBC;
require "cgi-lib.pl";
$DSN="shepmark2";
if (!($o = new Win32::ODBC($DSN))){
print "Error opening a connection.\n";
}
print "Content-type: text/html\n\n";
print "<html><body><pre>";
#***************************************************************************
*******
# The problem is with the insert into. It is not inserting the value into
the table. I have checked the database locally for data.
$x = 'testing';
$o->sql("insert into temptable values ($x)");
#***************************************************************************
*******
$o->sql("select * from temptable");
foreach $f ($o->fieldnames)
{ print $f . "\t"; }
print "\n\n";
while ($o->fetchrow)
{
foreach $f ($o->fieldnames)
{ print $o->Data($f), "\t"; }
print "\n";
}
print "</pre></body></html>\n";
------------------------------
Date: 04 May 1997 09:46:19 -0400
From: Chaim Frenkel <chaim@nlk.nlk.com>
To: abw@peritas.com
Subject: Re: Pointing a Filehandle _AT_ a Subroutine
Message-Id: <m3zpub5p04.fsf@nlk.nlk.com>
>>>>> "AW" == Andy Wardley <abw@peritas.com> writes:
AW> This is described in Camel II on page 193, although it suggests using
AW> defined($pid) to determine the parent/child-ness of the process. This
AW> is actually incorrect as defined($pid) returns true in both cases.
This, defined($pid), is to test for error condictions, *not* to
determine parent/child. If anything fails, undef is returned.
<chaim>
--
Chaim Frenkel Nonlinear Knowledge, Inc.
chaimf@cris.com +1-718-236-0183
------------------------------
Date: Sat, 03 May 1997 21:28:00 -0400
From: jordyn@bestweb.net (Jordyn A. Buchanan)
Subject: Re: problems receiving lines from modem
Message-Id: <jordyn-ya02408000R0305972128000001@nntp.bestweb.net>
Steven Headley <sheadley@cyberramp.net> wrote:
> Hi all,
> I am having a couple of problems with a script I am trying to write
> that enable me to dial out and print the output received by the modem to
> STDOUT.
>
> 1) I can't seem to flush the last line out of $_. It justs stays in the
> buffer until I turn off the modem, and then I see a printout on the
> screen.
At the top of your script, do this:
$| = 1;
That will make buffers clear out immediately. Otherwise, you will run into
problems like you describe.
> 2) Sometimes these AT commands work sometime they don't.
>
> $com="+< /dev/cua1";
> open(COMPORT,$com) || die "Can't open comm port $!";
> select((select(COMPORT), $! = 1)[0]);
> sleep 1;
> print COMPORT "ATZ\r\n";
> sleep 1;
> print COMPORT "ATS11=50\r\n";
> sleep 1;
> print COMPORT "ATDT222-222-2222\r\n";
> while(<COMPORT>) {
> print $_;
> }
That's a bit vague. What happens when they work? You may be running into
buffering problems once again--whenever you are doing I/O stuff that has
you looking at a data stream before closing the filehandle (which clears
out the buffers), it is a good idea to set $|. Otherwise, the behavior can
be somewhat erratic.
Jordyn
|---------------------------------------------------------------|
|Jordyn A. Buchanan jordyn@bestweb.net|
|Bestweb Corporation http://www.bestweb.net|
|Senior System Administrator +1.914.271.4500|
|---------------------------------------------------------------|
------------------------------
Date: Sat, 03 May 1997 19:56:51 -0600
From: weiqi@pipeline.com (Ian Morgan)
Subject: scientific notation compare bug
Message-Id: <weiqi-0305971956510001@ip12.austin7.tx.pub-ip.psi.net>
In the bug demonstrated below, $r is simultaneously greater than
1000 and less than 1000. But, only in perl5.003. Would
someone please help me report this bug to the perl gurus?
`perl5.003 -e
'$r=1.00000e+35;print$r;print"wrong"if($r<1000);print"right"if($r>1000)'
1e+35wrongright
`perl -e
'$r=1.00000e+35;print$r;print"wrong"if($r<1000);print"right"if($r>1000)'
9.9999999999999997e+34right
`perl -v
This is perl, version 4.0
$RCSfile: perl.c,v $$Revision: 4.0.1.8 $$Date: 1993/02/05 19:39:30 $
Patch level: 36
`perl5.003 -v
This is perl, version 5.003 with EMBED
built under aix at Oct 5 1996 09:44:00
+ suidperl security patch
--
Gala Weiqi -- Ian Morgan of Zapata Texas
------------------------------
Date: 3 May 1997 22:13:40 GMT
From: bseib@purdue.edu (Broc Seib)
Subject: Re: Time Question...
Message-Id: <bseib-0305971712380001@zeus.cc.purdue.edu>
In article <3368DD44.322E@consotech.se>, Cristo <cristo@consotech.se> wrote:
print scalar localtime(time);
> Hi!
>
> Question:
> How do I print the DATE and the TIME?
>
> Example :-)
> Print DATE
> Print TIME
>
> Please email me the answer to:
> cristo@consotech.se
_______________________________________________________________________
Broc Seib (bseib@purdue.edu) | Purdue University Computing Center
Network Systems Programmer | Instructional Computing Division
------------------------------
Date: Sun, 4 May 1997 23:45:41 -0400
From: Tim Simms <tsimms@intr.net>
Subject: Urgent help needed! State abbreviation conversion
Message-Id: <Pine.SOL.3.95.970504234129.10097D-100000@pete.intr.net>
Hi!
I apologize for only coming to the list when I need something, but could
someone please point me to some source of State name conversion to the
state 2 letter abbreviation? It doesn't matter which way, but it would be
best to go both ways. All I really need is a list of the 50 states and
their abbreviations, and I'll make an associative array, but the point is
I don't know the abbreviations and I don't want to have to type in the
whole 50 states! Perhaps someone has already done this or knows where
such a list exists?
Thanks much!
Regards,
-Tim
And if someone does help, I'll promise to start reading this list
semi-regularly and helping others!
------------------------------
Date: Sun, 04 May 1997 21:45:30 -0700
From: Dennis <zonycat@flash.net>
Subject: Re: Urgent help needed! State abbreviation conversion
Message-Id: <336D65EA.5816@flash.net>
Tim Simms wrote:
>
> Hi!
>
> I apologize for only coming to the list when I need something, but could
> someone please point me to some source of State name conversion to the
> state 2 letter abbreviation? It doesn't matter which way, but it would be
> best to go both ways. All I really need is a list of the 50 states and
> their abbreviations, and I'll make an associative array, but the point is
> I don't know the abbreviations and I don't want to have to type in the
> whole 50 states! Perhaps someone has already done this or knows where
> such a list exists?
>
> Thanks much!
>
> Regards,
> -Tim
>
> And if someone does help, I'll promise to start reading this list
> semi-regularly and helping others!
Do not know if this helps....
http://www.usps.gov/ncsc/lookups/abbr_state.txt
Has a list of abbreviations aand associated States.
Dennis
------------------------------
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 424
*************************************
