[6815] in Perl-Users-Digest
Perl-Users Digest, Issue: 440 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue May 6 12:17:17 1997
Date: Tue, 6 May 97 09:00:20 -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 Tue, 6 May 1997 Volume: 8 Number: 440
Today's topics:
Re: > 2GB "file too large", AIX 4.2, perl 5.001, not "u <minaret@sprynet.com>
Re: absolute novice - help me start <chris.lee@globasatcom.com>
closed filehandle error <nobody@sys.uea.ac.uk>
Re: closed filehandle error <thuja@internauts.ca>
Re: closed filehandle error <a.aitken@unl.ac.uk>
Re: compiling perl5.003 (Johann du Preez)
Re: explanation of contexts ?? <minaret@sprynet.com>
Re: I'm curious... What the "o" switch is for in s/// (Clay Irving)
Re: MacPerl5 on PB100 (Chris Nandor)
Re: need help w/forms and Perl <a.aitken@unl.ac.uk>
Re: need help w/forms and Perl <churchil@hiwaay.net>
new programmer seeks perl prog (Carl Young)
Re: Not word wraping. <minaret@sprynet.com>
Re: notice to antispammers (Kyzer)
Re: Object IDs are bad (was: Ousterhout and Tcl lost th <cliff@tricon.net>
Re: PERL NT Help ! <gordon.leslie.mcdorman@sap-ag.de>
Re: Perl or 'C'???? (Mike Stok)
Re: Perl script crashes under taint checking (Jeremy Anderson)
Problems with bit wise and (Wes Brown)
Re: program for perl? <a.aitken@unl.ac.uk>
Re: rational systems inc. annoying message in perl 5.00 <Chris.King@swindon-fc.demon.co.uk.mars>
Re: Script runs fine from shell, but browser doesn't re (Jeffrey Morgan)
Re: Urgent help needed! State abbreviation conversion <cliff@tricon.net>
Re: when moved from unix to nt breaks.....counting item (Mike Stok)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 6 May 1997 14:03:38 GMT
From: "Geoff Mottram" <minaret@sprynet.com>
Subject: Re: > 2GB "file too large", AIX 4.2, perl 5.001, not "ulimit"
Message-Id: <01bc5a26$199232c0$5797aec7@cactus>
> I'm running a perl (5.001) script on AIX 4.2 which receives files from
> a mainframe (over a TCP socket) and writes them to disk. When writing
> to a large_file_enabled filesystem, the program died at 2GB with:
> Sustem write error: File too large
Two gigabytes is the typical file size limit on a UNIX system. That's
because it's the largest number you can hold in a signed 32 bit integer.
Even if AIX can create larger files, Perl may not be able to manipulate
them properly. Are you sure you can't break the files up a bit?
--
Geoff Mottram
minaret@sprynet.com
------------------------------
Date: 6 May 1997 14:06:30 GMT
From: "chris" <chris.lee@globasatcom.com>
Subject: Re: absolute novice - help me start
Message-Id: <01bc5a26$95495740$b289accf@chris>
here's what i did (do).
1) installed perl into per5\perl5 directory.
2) type my program in the dos editor (i read that win95 users need to add
something other that #!/usr..... do you know what?)
3) saved it in my per5\perl5 dir
4) open up my perl.exe and nothing happened.
i need to save all programs as *.pl? also in my bin folder there is a
perl95.exe, should i be using this instead?
too many question, if you can answer these, i'm pretty confident i can
finally get cracking. thanks alot.
chris.
etta <etta@fyi.com> wrote in article
<336e84d1.10142617@netnews.worldnet.att.net>...
>
>
> Did you assocate the .pl ext to perl.exe in windows?
>
> Then you just go to the dir where the file you want to excuate
> and type: perl filename.pl
>
>
> Hope this helps,
>
> etta
>
>
------------------------------
Date: Mon, 05 May 1997 13:55:20 +0100
From: Undergraduate labs <nobody@sys.uea.ac.uk>
Subject: closed filehandle error
Message-Id: <336DD8B8.618F@sys.uea.ac.uk>
What could possibly be wrong with this program? I get the error
print on closed file handle main::FILE
#! /usr/local/bin/perl
open(FILE, "</fozz/home1/ug/cmp/u9437517/www/cgi-bin/test.pab");
print FILE "Hello\n";
close(FILE);
I am trying to write some perl to handle some routines in my web site
but I can't get anything to write to a file. So I thought I'd go back
to basics as above, even this doesnt work.
Paul.
------------------------------
Date: Tue, 06 May 1997 09:16:21 -0400
From: Michael Iles <thuja@internauts.ca>
Subject: Re: closed filehandle error
Message-Id: <336F2F25.6633@internauts.ca>
Undergraduate labs wrote:
> What could possibly be wrong with this program? I get the error
> print on closed file handle main::FILE
If Perl says the filehandle is closed, it's probably because it _is_
closed. You're not doing any error checking, so you don't know why the
open failed.
> open(FILE, "</fozz/home1/ug/cmp/u9437517/www/cgi-bin/test.pab")
> or die "Can't open test.pab: $!";
> print FILE "Hello\n";
> close(FILE) or die "Can't close test.pab: $!";
Mike.
--
Michael Iles, michaeli@dra.com
Ceci n'est pas une .sig
------------------------------
Date: Tue, 06 May 1997 14:17:52 +0100
From: Alastair Aitken <a.aitken@unl.ac.uk>
Subject: Re: closed filehandle error
Message-Id: <336F2F80.4976@unl.ac.uk>
Undergraduate labs wrote:
>
> What could possibly be wrong with this program? I get the error
>
> print on closed file handle main::FILE
>
> #! /usr/local/bin/perl
>
> open(FILE, "</fozz/home1/ug/cmp/u9437517/www/cgi-bin/test.pab");
^
Should be a ">" not a "<". The first is read the second is write.
> print FILE "Hello\n";
> close(FILE);
>
> I am trying to write some perl to handle some routines in my web site
> but I can't get anything to write to a file. So I thought I'd go back
> to basics as above, even this doesnt work.
Alastair.
------------------------------
Date: Tue, 06 May 1997 04:24:52 GMT
From: jcdup@ats.sani.org (Johann du Preez)
Subject: Re: compiling perl5.003
Message-Id: <336eb246.87887758@news.is.co.za>
On Mon, 05 May 1997 04:24:01 GMT, jcdup@ats.sani.org (Johann du Preez)
wrote:
>On 02 May 1997 14:13:41 -0700, Russ Allbery <rra@stanford.edu> wrote:
>
>>Johann du Preez <jcdup@ats.sani.org> writes:
>>
>>> When running "make" after "Configure" in an attempt to compile Perl
>>> 5.003 on a Digital Alpha Station 200 under Digital Unix, I get the
>>> following:
...
Thanks to all who responded.
I found the problem - The machines date was set at 1996 and I never
noticed it.
Johann du Preez
------------------------------
Date: 6 May 1997 14:05:47 GMT
From: "Geoff Mottram" <minaret@sprynet.com>
Subject: Re: explanation of contexts ??
Message-Id: <01bc5a26$66d4a400$5797aec7@cactus>
> could anyone point out an online source (faq, web page?) for a concise
> explanation of contexts (i.e. scalar & array) for a perl newbie (me).
> thanks,
The on-line man pages probably have everything you need. Start with "man
perl" for a table of contents. "man perldata" may also help.
--
Geoff Mottram
minaret@sprynet.com
------------------------------
Date: 6 May 1997 09:58:18 -0400
From: clay@panix.com (Clay Irving)
Subject: Re: I'm curious... What the "o" switch is for in s///
Message-Id: <5knddq$k1s@panix.com>
In <jullk5.9q.ln@localhost> tadmc@flash.net (Tad McClellan) writes:
>2)
>@pat = ("abc", "def", "ghi");
>foreach $pattern (@pat) {
> print "matched\n" if /$pat/; # can't use 'o' here. If you do, then it
print "matched\n" if /$pattern/; # Isn't this what you meant?
> # will try and match 'abc' for *every*
> # iteration of the loop
>}
--
Clay Irving See the happy moron,
clay@panix.com He doesn't give a damn,
http://www.panix.com/~clay I wish I were a moron,
My God! Perhaps I am!
------------------------------
Date: Tue, 06 May 1997 08:43:41 -0400
From: pudge@pobox.com (Chris Nandor)
Subject: Re: MacPerl5 on PB100
Message-Id: <pudge-ya02408000R0605970843410001@news.idt.net>
In article <E9qAAx.AvC@encore.com>, wpollans@scrap.encore.com (Warren
Pollans) wrote:
# Anyone using MacPerl5 on their pb100? I've downloaded
# Mac_Perl_513r2 and get something like: application "unknown"
# has unexpectedly quit, because an error of type 2 occurred.
# What
# does that mean - other than I can't run MacPerl5? I've been
# using MacPerl4 with no problems.
You need Mac_Perl_513r2_appl_big IN ADDITION TO Mac_Perl_513r2_appl.
The version you have -- if you check it with a utility like PowerPCheck --
only has PPC code in it; the PB100 is a 68K machine. The "big" MacPerl has
the 68K binary.
--
Chris Nandor pudge@pobox.com http://pudge.net/
%PGPKey=('B76E72AD',[1024,'08 24 09 0B CE 73 CA 10 1F F7 7F 13 81 80 B6 B6'])
#=============================================================================
I was going 70 miles an hour and got stopped by a cop who said, "Do you know
the speed limit is 55 miles per hour?" "Yes, officer, but I wasn't going to
be out that long..."
--Steven Wright
#=============================================================================
------------------------------
Date: Tue, 06 May 1997 14:02:15 +0100
From: Alastair Aitken <a.aitken@unl.ac.uk>
Subject: Re: need help w/forms and Perl
Message-Id: <336F2BD7.4592@unl.ac.uk>
Abigail wrote:
>
> On Sat, 03 May 1997 22:33:09 -0400, Peter Wood wrote in
> comp.infosystems.www.authoring.html,comp.infosystems.www.authoring.misc,comp.lang.perl.misc URL: news:peter.wood-ya023580000305972233090001@n5.supernews.com:
> But you haven't uttered a single word of Perl yet.
> ++ 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? :)
>
> You ask a non-Perl question in a Perl group. You refuse to give a
> fragment of your trivial code due to some secrets, but you got Perl,
> CGI *and* HTML (all three completely open) for free, and you don't
> intend to pay anyone giving an answer, and on top of that you request
> an private answer in stead of one in the group?
>
> That's many major violations of nettiquette.
>
> Go away.
These are "words of wisdom". Peter Woods' lack of respect for others
isn't an industrial secret anyway.
Absolutely *spot* *on*. I second that. Go away.
Sheesh!
Alastair.
------------------------------
Date: Mon, 05 May 1997 09:00:45 -0700
From: Michael Churchill <churchil@hiwaay.net>
Subject: Re: need help w/forms and Perl
Message-Id: <336E042D.5279@hiwaay.net>
Peter Wood Wrote:
<snip>
>
> 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?
In order to attach multiple data choices to a single button, "join" them
together using a token that won't appear in the text ("|" perhaps?), and
then "split" them while processing the response. This technique can
also be used to fake a 2-D associative array in perl.
--
Michael Churchill | " The nice thing about standards is that
Churchil@hiwaay.net | there are so many to choose from. "
http://www.netmechanic.com - Net Mechanic will tune your site for free!
------------------------------
Date: Tue, 06 May 1997 15:37:08 GMT
From: carl@youngo.demon.co.uk (Carl Young)
Subject: new programmer seeks perl prog
Message-Id: <336f4fa8.25685815@news.demon.co.uk>
I am looking for a perl script that will aloow multiple choice
questions, and depending on the answer a choice of output answers:
sort of like car insurance questions and then the programme gives a
quote>
Where do I start??
Anyone got a script like this?
Any help would be great.
thanks in advance
Carl Young.
------------------------------
Date: 6 May 1997 14:09:41 GMT
From: "Geoff Mottram" <minaret@sprynet.com>
Subject: Re: Not word wraping.
Message-Id: <01bc5a26$f24cae60$5797aec7@cactus>
I believe there is a word wrapping script in the CPAN archive.
You can get to CPAN from www.perl.com
--
Geoff Mottram
minaret@sprynet.com
------------------------------
Date: 6 May 1997 14:41:31 GMT
From: junkmail@sysc.abdn.ac.uk (Kyzer)
Subject: Re: notice to antispammers
Message-Id: <5knfur$nu9@info.abdn.ac.uk>
Now, here's a funny thing.
Normally, my From: header says "junkmail@[posting host due to tin].abdn.ac.uk
which is a valid address for reporting junkmail to. I cannot and do not wish
to read its mailbox, it must be full of spams.
Also, normally, my Reply-To: address is "dev.null" - the sort of address that
causes [mumble... tchrist] to scream abuse at the top of trees.
So, since then, I've changed it to "kyzer@hotmail.com" and my hotmail account
now contains 25 unsolicited mails, 3 of which contain attatched binaries for
an IBM-PC, 7 of which assume I live in the USA and 2 of which are entirely
illegal. There are no *human* communications to me at the hotmail account,
although there are a few stupid CC:s from usenet (I can read a newsgroup,
thankyou, stop wasting bandwidth on repeating messages, if you must really
mail me then mail me the Message-ID)
My next trick will be to try Eli the Bearded's trick of "kyzer @ hotmail.com"
but I doubt it will prove effective. In fact, there is still junkmail arriving
for me (filtered out, I might add) at my 4u.net address. There is no hope of
privacy. So, it does not matter a bit if Tom creates his list of antispammer's
real addresses. It's too late for that.
Our only hope is for removal of persistant spammer's internet feed, by the
people who supply it in the first place. It's really just a pesky fact of
modern life.
Stuart 'Kyzer' Caie - Kyzer/CSG |undergraduate of Aberdeen University |100%
http://www.abdn.ac.uk/~u13sac |My opinions aren't those of Aberdeen |Amiga -
kyzer@4u.net kyzer@hotmail.com |University or AUCC, thankfully.***** |always!
^^^^^^^^^^^^
This is my email address
It is in my signature
Anyone can read it
However most routines for scanning news for email addresses ignore it
Funny that, huh?
Now if someone wants to contact me, and they have my news posting as a
reference, they can see my signature.
If they're writing with some thought, they will remind themselves to put
one of my email addresses in their To: field
If they're dumb, they'll realise as soon as they get 'User dev.null not
known' instantly from their mailserver.
If they're *really* stupid, they'll never notice. It's probably a CC:,
so good riddance to it.
------------------------------
Date: Tue, 06 May 1997 10:10:50 -0400
From: Cliff Hall <cliff@tricon.net>
Subject: Re: Object IDs are bad (was: Ousterhout and Tcl lost the plot with latest paper)
Message-Id: <336F3BEA.ABD@tricon.net>
Peter Ludemann wrote:
>
> ark@research.att.com (Andrew Koenig) writes:
>
> > Exactly. They are two different objects with the same value.
> >
> > Whether or not that is an easy concept to live with seems to depend
> > on the local culture.
> >
> > Which is the main point I was trying to make.
>
> And your point is...?
>
> ...snip...
> It seems that you live in a culture that thinks two different objects
> with exactly the same value are OK. So, please tell my *why* you
> think this is a good thing. After all, the people who live without
> electricity have their reasons ... but I have not yet heard your
> reasons for not wanting what my experience has taught me is a
> wonderful thing: referential transparency.
hmmm, perhaps referential opaqueness is the one true path to becoming
one with $_
------------------------------
Date: Tue, 6 May 1997 13:31:29 GMT
From: Gordon McDorman <gordon.leslie.mcdorman@sap-ag.de>
To: Paul Zahnle <webmaster@nuro.com>
Subject: Re: PERL NT Help !
Message-Id: <uyb9sg21a.fsf@sap-ag.de>
>>>>> "Paul" == Paul Zahnle <webmaster@nuro.com> writes:
Paul> Hey All, In NT Land, Were having trouble passing an Arg. to
Paul> our script. the string will be:
Paul> /user-bin/ourscript.pl?file_number
[...]
1) Save yourself a lot of trouble and use CGI.PM
<url:http://www-genome.wi.mit.edu/ftp/pub/software/WWW/cgi_docs.html>
Paul> [...] ps:anyone
Paul> know of a good PERL for NT resource ?!?!?!
2) Start with the following:
<url:http://www.endcontsw.com/people/evangelo/Perl_for_Win32_FAQ.html>
--
--------------------------------------------------------------
The opinions expressed above are mine, not my employer's.
gordon.leslie.mcdorman@sap-ag.de
------------------------------
Date: 6 May 1997 12:46:49 GMT
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Perl or 'C'????
Message-Id: <5kn97p$5vu@news-central.tiac.net>
In article <fl_aggie-ya02408000R0505971046390001@news.fsu.edu>,
I R A Aggie <fl_aggie@hotmail.com> wrote:
>In article <5kjmdu$74k@in2.doitnow.com>, toeknee@doitnow.com (Simba) wrote:
>
>+ I need to start writing CGI scripts. I already have 'C' experience. Is
>+ it worth it to learn Perl??? Or just stick with 'C'?
>
>Perl is worth knowning. That said, however, if you know C and you need
>something *soon*, then use C.
>
>James - well, as long as you use a C CGI library to do the munging of the
> input data... ;)
One of the uses I have for perl is rapid prototyping, the code may not run
as fast as C, but even in perl 4 days you had cgi-lib.pl which did much of
the grunt work of dealing with CGI and now there's Lincoln Stein's CGI.pm
module for perl 5 it's possible to get something working quite quickly
with perl. Given perl 5's ease of representing complex data structures it
has the upper hand over C unless you particularly care about start-up
times or server load (in particular all those memory management and
pointer problems which might come up in C are avoided.) If you do care
about start up time or server load then it's worth taking a peek at
http://www.opengroup.org/~dougm/apache where Doug MacEachern's work to
build a perl interpreter into an apache web server is described.
No matter which approach you take it's worth using somebody else's library
- the CGI wheel has been invented many times in many languages...
Hope this helps,
Mike
--
mike@stok.co.uk | The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/ | PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/ | 65 F3 3F 1D 27 22 B7 41
stok@psa.pencom.com | Pencom Systems Administration (work)
------------------------------
Date: 6 May 1997 14:32:45 GMT
From: jeremy@blackbox.ylasia.com.tw (Jeremy Anderson)
Subject: Re: Perl script crashes under taint checking
Message-Id: <5knfed$smq@netnews.hinet.net>
Randy J. Ray (rjray@tremere.ecte.uswc.uswest.com) wrote:
: You don't tell us a great deal about *what* exactly the program does, both in
: general and specifically to the data.
:
: I can say this: the data is from an external source (a file), and as such under
: taint-checking is considered tainted. If you are using the IO::* modules, and
: are *absolutely certain* of the integrity of the file itself, the IO::File
: class has a method called untaint(). Read about it in the man page. Otherwise,
: you will have to wash the data as it is read (or before it is used in a
Well, the problem here is not that it fails taint checking (it doesn't).
I'll explain a little further, in a nutshell, what the program does, and how
it does it...
I have a directory tree which is full of reports from a FAX system. The
reports are multiple lines in a format like this:
Index Date Time Tel# CntryCode Status RxPages TxPages Secs Units Billvalue
The values used by the program are:
CntryCode (The country code in the destination telephone number)
RxPages (How many pages we received at the head end of the fax system)
TxPages (How many pages we sent out at the destination end)
Secs (How many seconds it took to send out the FAX)
Billvalue (how much we bill our OEMs to transfer these faxes)
We have one directory for each "node" in our network. In each directory,
there's one file for every OTHER node on the network, with a line-by-line
report of each FAX the node represented in the file sent to the node
represented by the directory. The root directory name is fixed in the program.
The file names are read out of the root directory, and associated subdirectories.
The data is stored in an associative array as follows:
$billing_data{$NodeName}{$CntryCode}[$RxPages,$TxPages,$Secs,$Billvalue]
Every time a line is read, a new array is created if it's a previously
unrecorded country code, or added to if it's a previously known country code.
The problem may be in here, as it's certainly giving Perl's garbage collection
algorithm a run for its money.
Anyhow, I read in about 50 MB worth of this dross, and then spit out reports
on what the traffic is through each node, what our most popular destination
countries are, so on and so forth. Pretty dull stuff.
To reiterate, the problem does NOT apparently lie with the taint checking
_per se_. The program happily reads through several hundred files without
a complaint before crashing. It appears to be a memory allocation problem,
but since the only record I have of what it's doing before the crash is an
every-10-second update letting me know about how many records the program
has crunched through (never the same number) I don't know what line of the
program the crash is occuring on or what the memory status is.
I once tried running the program with the -D16 switch on. Aside from getting
buried in perl entrails, this was not very enlightening.
Cheers!
jeremy
------------------------------
Date: 6 May 1997 13:00:15 GMT
From: wes@prozac.eeap.cwru.edu (Wes Brown)
Subject: Problems with bit wise and
Message-Id: <5kna0v$ck1@alexander.INS.CWRU.Edu>
Found an interesting little problem with the bit wise and operation in
perl. (I have tested this on 5.002 and 5.003)
If I have
$xx = (129) & (255);
print "$xx\n";
Then it returns 129 as it should.
However, if I use a subroutine and pass things in:
result: 001.20.0.0
net: 129.22.0.0
Then it returns 001.
Entire sample program below. I do not understand.
Wes
---
Wes Brown
ewb4@po.cwru.edu wes@prozac.cwru.edu
http://prozac.cwru.edu/wes/About.me.html
KB8TGR
#!/usr/bin/perl5 -w
sub doand {
local(*a, *b) = @_;
local($max) = $#a > $#b ? $#a : $#b;
local(@sum);
for (local($i) = 0; $i <= $max; $i++) {
$c = $a[$i];
$d = $b[$i];
$sum[$i] = (($c) & ($d));
}
@sum;
}
$mask = "255.255.0.0";
$address = "129.22.56.88";
$net = "129.22.0.0";
@net = split(/\./,$net);
@mask = split(/\./,$mask);
@address = split(/\./,$address);
@result = &doand(*address, *mask);
print "result:\t", join('.', @result),"\n";
print "net:\t$net\n";
------------------------------
Date: Tue, 06 May 1997 14:13:01 +0100
From: Alastair Aitken <a.aitken@unl.ac.uk>
Subject: Re: program for perl?
Message-Id: <336F2E5D.27B3@unl.ac.uk>
Dave Carrigan wrote:
>
> >>>>> "Randal" == Randal Schwartz <merlyn@stonehenge.com> writes:
>
> Randal> $ cat >myscript
> Randal> #!/usr/bin/perl
> Randal> ... [rest of script]
> Randal> ...
> Randal> ^D
> Randal> $ chmod +x myscript
> Randal> $ ./myscript
> Randal> [runs perfectly]
> Randal> $
>
> So, which program, `cat' or `chmod' does the auto perl debugging part?
> I really, really need to get me one of those.
hehe - I'm sure Randal's scripts *never* need debugging. :-)
Alastair.
------------------------------
Date: Tue, 6 May 1997 14:48:55 +0100
From: Chris King <Chris.King@swindon-fc.demon.co.uk.mars>
Subject: Re: rational systems inc. annoying message in perl 5.000
Message-Id: <SemafAAHbzbzEw+e@swindon-fc.demon.co.uk>
On Mon, 5 May 1997 at 23:46:49 in article <01bc59ae$98225660$313d4789@po
llux.direcpc.net>, paul spitalny <pauls@pauls.seanet.com> writes
>Hello Perl usrs,
>I am using perl 5.000 from a dos prompt (I know, I'm not up to date).
>Whenever I run a script I get an annoying message that goes as follows:
>
> DOS/4GW Protected Mode Run-time version 1.9
> Copyright (c) Rational Systems, Inc. 1990 - 1993
No problem: In your autoexec.bat file, add the following line:
SET DOS4G=QUIET
That shuts it up fine.
--
Chris King
The similarity of any fact mentioned within this post and
any in reality, living or dead, is purely coincidental.
Remove 'mars' from address when replying. I hate spam.
I like corned beef though.
------------------------------
Date: Tue, 06 May 1997 14:10:07 GMT
From: myxx@sel-mor.com (Jeffrey Morgan)
Subject: Re: Script runs fine from shell, but browser doesn't receive variables ::SIGH::
Message-Id: <337039a6.4279426@news.atl.mindspring.com>
I will never understand the need to publically humiliate someone,
while wasting precious bandwidth, to say something like:
Read the FAQ.
Well, I read the Idiots etc before I posted. I suppose next time I
will say that I read it, but that will probably result in someone
saying read it again.
The sad thing is that only one person here actually said something
useful without being snide. Another at least gave me some good
information without being too insulting. I even received two emails
that told me the same things the worst of you said. At least they
weren't so childish as to post them publically.
Just a little hint, if you are trying to help someone by suggesting
they read something informative, please use email. It uses less
bandwidth and shows that you really mean to try and help. Otherwise,
try and call home to Mother and learn some manners. All public
humiliation achieves is bitterness. You think I am useless for not
knowing the right group to post in or the right FAQ to read. I think
you are an insensative and egotistical in your superiority. My fault
was ignorance which can be corrected over time. Yours, however...well
that doesn't need to be said.
------------------------------
Date: Tue, 06 May 1997 09:28:21 -0400
From: Cliff Hall <cliff@tricon.net>
Subject: Re: Urgent help needed! State abbreviation conversion
Message-Id: <336F31F5.446B@tricon.net>
> Tim Simms wrote:
>
> Hi!
[Er, God? Are you there?]
>
> I apologize for only coming to the list when I need something,
[I know I haven't been to church in a long time, and I rarely...
ok -- *never* pray, ]
> but could
> someone please point me to some source of State name conversion to the
> state 2 letter abbreviation?
[but I've really got a terrible problem here and I need your help.
See,
I asked two different girls out to the prom, and now I just don't
know
what to do.]
> It doesn't matter which way, but it would be
> best to go both ways.
[I could dump either of them, but I'd really like to have them
both...]
> 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!
[All I really want is a little window-fogging action in the car
afterwards,
and I think I could handle it from there, but I just don't want to
have
to endure all the tedious foreplay necessesary to get to that point!]
> Perhaps someone has already done this or knows where
> such a list exists?
[So, if you could just make sure I end up with whichever one is the
hose-beast...]
> Thanks much!
[Amen.]
>
> Regards,
> -Tim
>
> And if someone does help, I'll promise to start reading this list
> semi-regularly and helping others!
[And if I score, I promise to start going to church, and this time
I'll put money *into* the collection plate...]
------------------------------
Date: 6 May 1997 13:38:16 GMT
From: mike@stok.co.uk (Mike Stok)
Subject: Re: when moved from unix to nt breaks.....counting items in array
Message-Id: <5knc88$9np@news-central.tiac.net>
In article <MPG.dd87dedde06bb9c989682@newshost.waymark.net>,
David Schultz <david@zsi.com> wrote:
>I have a simple question.
>
>I am simply trying to count the number of items in an array...on
>unix...the following works..
>
>$counter = @mylist;
>Of course once moved to the nt machine..it fails to give any non zero
>values.
The chances are that perl's doing the right thing, maybe you really dop
have an empty array. How are you populating it?
Have you tried a program like:
@array = ('one', 'two', 'three');
$count = @array;
print "array has $count elements.\n";
to see if perl's working or not.
Hope this helps,
Mike
--
mike@stok.co.uk | The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/ | PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/ | 65 F3 3F 1D 27 22 B7 41
stok@psa.pencom.com | Pencom Systems Administration (work)
------------------------------
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 440
*************************************
