[6645] in Perl-Users-Digest
Perl-Users Digest, Issue: 270 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Apr 10 13:07:13 1997
Date: Thu, 10 Apr 97 10:00:26 -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 Thu, 10 Apr 1997 Volume: 8 Number: 270
Today's topics:
Re: "Dummies" book any good? <johnc@interactive.ibm.com>
Re: attach file to email form (Nathan V. Patwardhan)
Re: current dir curiosity <ray@westlake.com>
Re: Kudos to Tom Christiansen and problems with OO (Jay Flaherty)
Re: Kudos to Tom Christiansen and problems with OO (Billy Chambless)
Re: link between C and PERL <seay@absyss.fr>
Re: list directory files in order of creation. <merlyn@stonehenge.com>
localtime.pl NOT Found! <pdurusau@emory.edu>
Pattern matching.... <slmingol@kodak.com>
Perl 5.004 release date? (Mike Iglesias)
perl- equivalent to set -x (Howard Salomon)
Renderman binding for Perl? (Michael Barabanov)
Re: Reply to Ousterhout's reply (was Re: Ousterhout and <prasadm@not4u.polaroid.com>
Re: Reply to Ousterhout's reply (was Re: Ousterhout and <vbykov@cam.org>
Re: Running Perl script w/i Unix Shell Script <gsievers@gsievers.xnet.com>
Re: Unix and ease of use (WAS: Who makes more ...) (jason olmsted)
Re: Unix and ease of use (WAS: Who makes more ...) <tim@a-sis.com>
Re: Who makes more $$ - Windows vs. Unix programmers? (Kaz Kylheku)
Re: Who makes more $$ - Windows vs. Unix programmers? <rofa@penti.sit.fi>
Re: Why are no elements returned from split(/X/,'')? (Mik Firestone)
win32 perl problem <stamper@cybercash.com>
Re: win32 perl problem (Nathan V. Patwardhan)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 10 Apr 1997 10:49:01 -0600
From: John Call <johnc@interactive.ibm.com>
Subject: Re: "Dummies" book any good?
Message-Id: <334D19FD.7817@interactive.ibm.com>
I have never tried the "dummies" book but I can recommend one I do like.
The Waite Groups Perl book (the one that talks about their 'ezone') is
an excellent beginner to intermediate resource.
------------------------------
Date: 10 Apr 1997 15:27:39 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: attach file to email form
Message-Id: <5ij0tb$j54@fridge-nf0.shore.net>
Darren Westlake (darren@spiritec.com) wrote:
: Is it possible to attach a local file to an email form?
: If so, could anyone point me in the right direction for doing this
: bearing in mind that I'm fairly new to Perl!
Yes. You might look into MIME::MIME-Lite-1.121.tar.gz, which is
available from: http://www.perl.com/CPAN/modules/by-module/MIME/
This module is well-documented in POD (plain old documentation) format,
and should get you started.
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: Thu, 10 Apr 1997 11:11:15 -0400
From: Ray Cromwell <ray@westlake.com>
To: John Dallman <jgd@cix.compulink.co.uk>
Subject: Re: current dir curiosity
Message-Id: <334D0313.358A2AAD@westlake.com>
John Dallman wrote:
>
> > From: Ray Cromwell <ray@westlake.com>
>
> > Recently, I had the problem of trying to obtain the current
> > directory. This hadn't been a problem, for years, I used `pwd` on
> > unix. The problem is, it doesn't work on NT...
>
> Yes, it does. You do have to get the \n off the end; this would be
> portable between UNIX and NT:
>
> $curdir = `pwd`;
> $curdir =~ s/\n//g; # chop would damage it on UNIX
no, chop works fine on unix, and you can use chomp if you want
to be safe.
chomp($curdir = `pwd`);
> $curdir =~ s/\r//g; # get rid of \r just for paranoia's sake
PWD doesn't work on NT, atleast if you are running the standard
NT shell. It doesn't work on my perl5 HIP install nor on my perl4. But
that wasn't my question. Even if `pwd` had an internal emulation for
other O/Ses, my question is why? Why provide an internal emulation for
`pwd` and not add getcwd() to perl's standard builtin function list.
It's just a curiousity of mine as to why Larry Wall never added
it. I mean, you've got really low level O/S specific calls in there
like shared-mem gets, but no builtin call for current directory which
every O/S out there surely has?
I'm a big fan of Perl's "there's more than one way to do it",
and I'd like to be able to use
require 'pwd.pl'
or
use Cwd;
$dir = cwd;
or
chomp($dir = `pwd`);
or
$dir = getcwd(); # built in perl func, calls O/S level function
I sense a conspiracy ;-)
-Ray
------------------------------
Date: 10 Apr 1997 14:00:44 GMT
From: fty@hickory.engr.utk.edu (Jay Flaherty)
Subject: Re: Kudos to Tom Christiansen and problems with OO
Message-Id: <5iirqc$9gf$1@gaia.ns.utk.edu>
Luca Passani (lpa@sysdeco.no) wrote:
: I think you are wrong.
:
: first off, this is a newsgroup, and the whole point of a newsgroup is
: that I give one hour of my time and use one thousand hours offered by
: one thousand partecipants.
:
: > While I understand your frustration, it sounds as though you feel it is the
: > obligation of people here to help you. That is a bit presumptuous.
:
: it's not compulsory for you as a single to give an answer, but the
: newsgroup as a whole has some kind of obligation to answer *legitimate*
: questions.
:
I think you need to read up on "What is Usenet" at:
http://www.netannounce.org/news.announce.newusers/archive/usenet/what-is/part1
especially:
WHAT USENET IS NOT
------------------
1. Usenet is not an organization.
No person or group has authority over Usenet as a whole. No one
controls who gets a news feed, which articles are propagated
where, who can post articles, or anything else. There is no
"Usenet Incorporated," nor is there a "Usenet User's Group."
You're on your own.
Granted, there are various activities organized by means of Usenet
newsgroups. The newsgroup creation process is one such
activity. But it would be a mistake to equate Usenet with the
organized activities it makes possible. If they were to stop
tomorrow, Usenet would go on without them.
2. Usenet is not a democracy.
Since there is no person or group in charge of Usenet as a whole
-- i.e. there is no Usenet "government" -- it follows that Usenet
cannot be a democracy, autocracy, or any other kind of "-acy."
(But see "The Camel's Nose?" below.)
3. Usenet is not fair.
After all, who shall decide what's fair? For that matter, if
someone is behaving unfairly, who's going to stop him? Neither
you nor I, that's certain.
4. Usenet is not a right.
Some people misunderstand their local right of "freedom of speech"
to mean that they have a legal right to use others' computers to
say what they wish in whatever way they wish, and the owners of
said computers have no right to stop them.
Those people are wrong. Freedom of speech also means freedom not
to speak. If I choose not to use my computer to aid your speech,
that is my right. Freedom of the press belongs to those who own
one.
--
**********************************************
Jay Flaherty fty@hickory.engr.utk.edu
------visualize whirled peas------
**********************************************
------------------------------
Date: 10 Apr 1997 15:09:05 GMT
From: billy@cast.msstate.edu (Billy Chambless)
Subject: Re: Kudos to Tom Christiansen and problems with OO
Message-Id: <5iivqh$rt0$1@NNTP.MsState.Edu>
In article <334CA866.1D82@sysdeco.no>, Luca Passani <lpa@sysdeco.no> writes:
|> Chris Nandor wrote:
|> > While I understand your frustration, it sounds as though you feel it is the
|> > obligation of people here to help you. That is a bit presumptuous.
|> it's not compulsory for you as a single to give an answer, but the
|> newsgroup as a whole has some kind of obligation to answer *legitimate*
|> questions.
You're absolutely right! I think you should file a formal complaint with
the Usenet Cabal, Answer Obligation Division. I'll bet they end up
firing half the newsgroup.
|> I can't understand why CGI question get answers like "this is the wrong
|> group and this is the answer", while mine, purely about perl OO features
|> I am trying to learn, was left unattended for days when anyone a little
|> bit more knowledgable than me could have found the answer with a single
|> look.
It's union rules. CGI questions in this group can be answered by
anybody, including apprentices and Snotty Answer Specialists, while
OO questions have to be answered by either an OO Specialist 1, or
a General Wizard. I would surmise that the OO Specialists were all busy
constructiong or whatever they do, and there was a big Wizard's
convention in Carmel that all the GW's were probably at.
The email reply you got was probably from Tom's email-answer program,
which was taking a break from the novel it's working on.
If you had filed Form 1993-98:Z : Request, Answer, Perl, Programming in
triplicate with the proper authorities, your request could have been
expedited. As it was, we failed to assign someone to your problem.
|> On the other hand I think the newsgroup sort of misbehaved.
Bad newgroup! Bad! Bad!
All of you, go sit in the corner and write csh scripts until you've
learned to behave!
------------------------------
Date: Thu, 10 Apr 1997 17:48:26 +0100
From: Douglas Seay <seay@absyss.fr>
To: Bochenek Christophe <bchrist@cme.nist.gov>
Subject: Re: link between C and PERL
Message-Id: <334D19DA.456A@absyss.fr>
Bochenek Christophe wrote:
>
> Hi,
>
> I have managed to make a perl program run by an other one, but I would
> like to make a C program run by a perl program.
> I have tried a very basic example:
>
> #! /usr/local/bin/perl
> $prg='essai.c';
> print "everybody ".`$prg`."\n";
>
> My C program just prints: hello
> #include "stdio.h"
> main()
> {
> printf("hello\n");
> }
>
> Then this error message appears:
>
> web% perl hello.cgi
> .//essai.c: syntax error at line 5: `printf' unexpected
> everybody
Bochenek,
I think you are kinda fuzzy on a few details here. The big one is
`string` will return the output of the string, where it is interpred as
a shell command. In other words, your system just launched a shell to
execute 'essai.c'. The #include is a a shell comment, main() defines a
shell function, so that works. When it comes time to execute printf,
your shell cannot find a builtin called printf, nor is an executable
called printf in the $PATH, so you get a syntax error. If you just want
the contents of $prg, change that to be
print "everybody ", `cat $prg`, "\n";
where you let the cat program open the file and read the contents. You
might not like the final \n (that depends on your formating taste).
In addtion, you invoke perl without -w, which is a no-no. Always try
with -w before posting. -w is a great way of finding silly errors.
Now a little question for you: did you want your script to execute
essai.c and get "hello" so that your output would be the same as
print "everybody hello\n";
If so, you need to rethink things a bit. Perl is not going to compile
your c code for you. You need to make an executable and have perl run
that. If you need to integrate C into Perl, you'll need XS, but I'd
guess that XS is a bit beyond your level at the moment, and isn't needed
for something as trivial as this. Here you just want to manipulate the
output of an arbitrary program that happens to be written in C.
Do yourself a favor and buy one of the Perl books and read it. At
http://www.perl.com/ you'll find a list of Perl books with title, author
and ISBN and TomC's rating of each one (1-5 camels where 5 is the book
Tom helped write). Look for Randal Schwartz's "Learning Perl". Buy it,
read it, grok it.
- doug
------------------------------
Date: 10 Apr 1997 08:09:45 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: whawkes@lynx.dac.neu.edu (walter hawkes)
Subject: Re: list directory files in order of creation.
Message-Id: <8cbu7m7w3q.fsf@gadget.cscaper.com>
>>>>> "walter" == walter hawkes <whawkes@lynx.dac.neu.edu> writes:
walter> I'm writing a program that reads the files in a directory and prints
walter> them out in the order they were last modified.
walter> I'm having a problem with getting them in the order they were created.
walter> So that the newest files will be printed first.
That's not possible. Unix doesn't retain the "creation time" of
anything. "last modified" is about the closest you can get.
print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,495.69 collected, $182,159.85 spent; just 509 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@ora.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: Thu, 10 Apr 1997 11:28:28 -0400
From: Patrick Durusau <pdurusau@emory.edu>
Subject: localtime.pl NOT Found!
Message-Id: <334D071C.6C7E@emory.edu>
Hello,
I am trying to run Darryl Burgdorf WebBBS script on a Solaris 2.5.1 Unix
box under an Netscape Enterprise 2.01 server. The error message in the
log file is:
"the CGI program /public/scripts/ITS/demo/forum/index.cgi did not
produce a valid header (name without value: got line "can't locate
/usr/local/lib/perl5/timelocal.pl in @inc at
/usr/ns-home/https-shemesh/cgi-bin/webbbs.pl line 61.")
When I run perl -V on the box, the INC: shows as:
/usr/local/lib/perl5/sun4-solaris/5.003
/usr/local/lib/perl5 /usr/local/lib/perl5/site_perl/sun4-solaris
/usr/local/lib/perl5/site_perl
The line complained of in the error simply reads:
require "timelocal.pl";
And, yes, timelocal.pl is in the /usr/local/lib/perl5 directory.
I have had prior problems with this server, from killing itself when it
re-reads config files to failing to pass environmental variables, so I
suspect the server but I wanted to see if I have overlooked something
before posting to the Netscape server groups. Some of their posters seem
to think that problems such as this one could not be related to the
server and must be with Perl. (Of course a lot of them use PC boxes for
servers as well. ;-))
Many thanks for any suggestions.
Patrick
Patrick Durusau
Information Technology
Scholars Press
pdurusau@emory.edu
------------------------------
Date: Thu, 10 Apr 1997 11:45:26 -0400
From: Sam Mingolelli <slmingol@kodak.com>
Subject: Pattern matching....
Message-Id: <334D0B16.34CD@kodak.com>
<snip>
$pattern="(\S+).*\s(\w+)\s(\w+)\s+(\w+)\s(\S+)\s(\S+)" ;
($security,$size,$month,$day,$time_or_year,$filename)=/$pattern/ ;
print "$pattern\n" ;
<snip>
My goal is to do a pattern match without having to designate the pattern
on
the same line with the variables which I intend to store them in.
Is this possible?
TIA
------------------------------
Date: 10 Apr 1997 16:44:56 GMT
From: iglesias@draco.acs.uci.edu (Mike Iglesias)
Subject: Perl 5.004 release date?
Message-Id: <5ij5e8$t7d@news.service.uci.edu>
Does anyone have a guesstimate of when Perl 5.004 will be officially
released? I've had some requests to add GDBM and some other packages
to what we have now, and I'd rather not have to do this for 5 different
architectures and then find out that 5.004 is about to be released, have
our uses clamor for it, and have to do it over again.
I realize that schedules can slip and any estimated release date will
be treated as such.
Thanks!
--
Mike Iglesias Internet: iglesias@draco.acs.uci.edu
University of California, Irvine phone: (714) 824-6926
Office of Academic Computing FAX: (714) 824-2069
------------------------------
Date: Thu, 10 Apr 1997 15:32:02 +0000 (GMT)
From: Howard.Salomon@ec.gc.ca (Howard Salomon)
Subject: perl- equivalent to set -x
Message-Id: <199704101532.PAA10156@castor.cmc.ec.gc.ca>
Operationally we run mostly in batch mode, in our shell scripts we use
set -x to echo back to a file each command line, is there something in
perl that does the same?
--
-------------------------------------------------------------------------
+ Every decision you make is a mistake. (Edward Dahlberg)
Howard Salomon Canadian Meteorological Centre
Analyst/Programmer 2121 N. Service Rd.
Howard.Salomon@ec.gc.ca Dorval,Quebec
Environment Canada CANADA H9P1J3
PHONE: 514-421-4651 FAX: 514-421-4679
-------------------------------------------------------------------------
------------------------------
Date: 9 Apr 1997 20:20:42 -0600
From: baraban@luz.cs.nmt.edu (Michael Barabanov)
Subject: Renderman binding for Perl?
Message-Id: <5ihipq$cfu@luz.cs.nmt.edu>
Is there a Renderman (tm) binding for Perl?
Thanks,
Michael.
------------------------------
Date: Thu, 10 Apr 1997 11:47:35 -0400
From: "M. Prasad" <prasadm@not4u.polaroid.com>
Subject: Re: Reply to Ousterhout's reply (was Re: Ousterhout and Tcl ...)
Message-Id: <334D0B97.1A64@not4u.polaroid.com>
Bill House wrote:
> Other languages, such as Lisp, also suffer from this dynamic. Lisp is
> perceived as some obscure, experimental language that is inherently slow.
> None of this is necessarily true, but perception prevents many WinTel
> programmers from even investigating the options. This loss of a
Lisp is rather nice, but it is the evangelists/Lisp-marketeers
many of us could do without. I have gotten to suspect that
since a programming language occupies a lot of a programmer's mind
and thoughts, and since programming in Lisp tends to encourage
the quick hack for "fooling the machine" to get what you want
done, the hardcore Lisp programmers tend to acquire the mindset
that in a newsgroup the objective is to "fool the audience" to
get them to believe whatever you want them to believe.
Amazingly, a lot of the hardcore ng Lisp evangelists don't even
seem to have learned the language or the issues well, but are good
at fooling the audience into believing they have! And those
who do know the language and the issues well will not speak
out if it contributes away from a "desired" fooling of the
audience. Contrast that with C, where in strange debates
involving Scott Nudd, C supporters would go out of their way
to correct each other if one of them stepped on the truth
and facts.
Duck...
------------------------------
Date: 10 Apr 1997 15:24:12 GMT
From: "Vassili Bykov" <vbykov@cam.org>
Subject: Re: Reply to Ousterhout's reply (was Re: Ousterhout and Tcl ...)
Message-Id: <01bc45c3$76e83540$752d54c7@vbykov.hip.cam.org>
Smiljan Grmek <Smi@4mate.hr> wrote in article <334BC586.2B5C@4mate.hr>...
> Sorry, Smalltalk is infinitesimaly used. There is an ongoing drive by
> IBM (of all companies!) but with little sucess. This can easily be
> verified if you look at job offerings on the Net with Smalltalk as
> keyword.
Sorry, but you have no idea what you are talking about. Are you an
experienced Smalltalker unable to find a job? I don't think so. If you
claim Smalltalk is "infinitesimally" used, it's you who are in the wrong
place in the wrong time with the wrong skills. No, Smalltalk jobs are not
hire-by-the-dozen kind of thing some others are, but this is only an
advantage when you are on this side of the fence.
Besides, it might be useful to know that interesting positions are rarely
found through the Net or newspaper ads.
--Vassili
------------------------------
Date: 10 Apr 1997 11:45:01 -0500
From: Jerry Sievers <gsievers@gsievers.xnet.com>
Subject: Re: Running Perl script w/i Unix Shell Script
Message-Id: <x7ybaqj08i.fsf@gsievers.xnet.com>
david@temss2.main.temple.edu (David Tucker) writes:
> Can you run a perl script within a UNIX shell script without having
> to preface all Perl variables starting with a $ i.e. $a with
> a backslash i.e. \$a.
>
> Otherwise, the UNIX shell will interpret the variable within the
> shell context and give a "Variable syntax" error.
>
> Thanks in advance.
use single quotes like this.......
----------------------------------------------------
#!/bin/sh
echo hello
perl -e '
$foo = "hello\n";
print $foo;
'
----------------------------------------------------
--
@------------------------------------------------------------------@
| Jerry Sievers Unix Admin/Web Site Architect |
| 312 527-0618 (home) mailto:gsievers@xnet.com |
| 847 317-7469 (work) http://www.xnet.com/~gsievers |
@------------------------------------------------------------------@
------------------------------
Date: 10 Apr 1997 15:14:04 GMT
From: olmstj@phat-media.com (jason olmsted)
Subject: Re: Unix and ease of use (WAS: Who makes more ...)
Message-Id: <5ij03s$509$5@news13.gte.net>
>"Tim Behrendsen" <tim@a-sis.com> writes:
>
>> But I don't even need to go there. Name one freely available
>> *significant* product that is *clearly* better than *any* commercial
>> product, regardless of price. There are some good programs of limited
>> size that are not worth a commercial entity rewriting (some may
>> say Emacs, but I wouldn't...), but I mean products of significant
>> size and complexity.
>
>TeX
I don't share the belief, but a fair number of people believe
Microsoft Internet Explorer is a superior product to Netscape
Navigator.
Mind you, these people must not care about security or platform
consistency, but there it is, a "free" product that is on par with a
commercial one (though who knows how much we'll pay for it in the end)
------------------------------
Date: 10 Apr 1997 15:04:35 GMT
From: "Tim Behrendsen" <tim@a-sis.com>
Subject: Re: Unix and ease of use (WAS: Who makes more ...)
Message-Id: <01bc45c0$691ee100$87ee6fce@timpent.a-sis.com>
Douglas Seay <seay@absyss.fr> wrote in article <334BC773.570E@absyss.fr>...
> Tim Behrendsen wrote:
> > > Perl is free and
> > > boy, is it handy.
> >
> > Perl is the one good example that someone e-mailed to me, and there
> > isn't a better commercial alternative that I know of. But while
> > it's hugely useful, I also specified that it the product had to
> > be sufficiently complex, and while it's not insignificantly
> > complicated, it's not hugely complex either. I really not trying
> > to trash Perl; it's a marvelous program. I'll even concede this
> > point because it's so good.
>
> Excuse me, but "it's not hugely complex either"?
>
> What is the base line for "hugely complex" then?
Well, hard to measure these things of course, but let's say above the
100K-200K lines of code range.
Perl4 is 33800 LOC (including comments, blank lines, etc), and Perl5
is 51718.
--
==========================================================================
| Tim Behrendsen (tim@a-sis.com) | http://www.cerfnet.com/~timb |
| "Judge all, and be prepared to be judged by all." |
==========================================================================
------------------------------
Date: 10 Apr 1997 15:32:33 GMT
From: kaz@vision.crest.nt.com (Kaz Kylheku)
Subject: Re: Who makes more $$ - Windows vs. Unix programmers?
Message-Id: <5ij16h$dn@bcrkh13.bnr.ca>
In article <5ihhpq$pfq@mtinsc05.worldnet.att.net>,
Craig Franck <clfranck@worldnet.att.net> wrote:
>At the time the statement was made I am sure it was true.
>Things change fast in the computer industry...
You can't change the origin of a name.
Why don't we agree that USA stands for Unexplored Southern Area? (From
a Canadian point of view, anyway). Heck, things change!
------------------------------
Date: Thu, 10 Apr 1997 19:10:47 +0300
From: Robert Bergfors <rofa@penti.sit.fi>
Subject: Re: Who makes more $$ - Windows vs. Unix programmers?
Message-Id: <334D1107.129C279F@penti.sit.fi>
MULTICS=MULTiplexed Information and Computing System
A project of General Electrics, Bell Labs and MIT
MULTICS was used in 1969 on a GE645-computer, but was a resourc hogger.
Ken Thompson was working on a game called 'Space Travel in those times,
and he and Dennis Ritchie started poring it to a PDP-7 computer. It had
virtually no software, so they started developing a simple OS for it in
the GE-enviroment, nd the stuff had to be loaded into the PDP with those
hole-paper reels they had at that time.
This new OS was capable of up to two users simultaneously, and a friend
of them (Brian Kerrigan) said that an appropriate name for the OS would
be UNICS -- 'UNiplexed Information and Computing System', in year 1970.
The name soon became 'UNIX'.
Later they continued the project on a PDP 11/20 system, and at that time
they already had the 'roff' program on the machine.
Bell's patent bureau registered the OS in year 1971 as 'First Edition'
The programming language was 'B'-language, which was a derivative of
BCPL, which in turn was a derivative of the Algol60-language.
Dennis ritchi added some features to the B-language, and this new
language became the C-language. It became popular right away and thus
the UNIX programs were written in C.
Correct me if I am wrong.
Thank you, I just had to write this...
Robert Bergfors
rofa@penti.sit.fi
------------------------------
Date: 10 Apr 1997 15:30:18 GMT
From: mfiresto@vnet.ibm.com (Mik Firestone)
Subject: Re: Why are no elements returned from split(/X/,'')?
Message-Id: <5ij12a$pnu$1@mail.lexington.ibm.com>
In article <5iij92$ge8@pirate.shu.edu>,
David Alan Black <dblack@icarus.shu.edu> wrote:
>But still - if this results in a one-element array:
>
>@foo = '';
>
>then one could understandably expect a function which returns the
>original string, where the original string eq '', also to result
>in a one-element array:
>
>@foo = split (//, '');
>
>But it doesn't.
>
>I think we're seeing the difference between defined and undefined
>null values, since even this:
>
>@list = $uninitialized_scalar;
>print $#list;
>
Um, the difference here is the difference between a null list and a list of
nulls.
@foo = '' forces the RHS to be evaluated in a list context, which
translates into @foo = (''), which is a list of one element.
@foo = split(//,'') is already evaluating in a list context - no forcing
involved. Thus, split(//,'') evaluates to (), which is completely
different from ('').
Hope this helps,
Mik
-----
Mik Firestone mfiresto@mindspring.com
Evil Overlord Rule #20: I will never employ any device with a digital
countdown. If I find that such a device is absolutely unavoidable, I
will set it to activate when the counter reaches 117 and the hero is
just putting his plan into operation.
------------------------------
Date: Thu, 10 Apr 1997 11:30:40 +0500
From: Levi Stamper <stamper@cybercash.com>
Subject: win32 perl problem
Message-Id: <334C8910.3297@cybercash.com>
I am using the w32 version of perl on NT4.0 (shipped with NT reskit),
and can't get the simplest of things to work..
how can I read command-line arguements? @ARGV[0] doesn't point to
anything...this works on every other platform I've tried it on.
thanks,
LS
<stamper@cybercash.com>
------------------------------
Date: 10 Apr 1997 15:40:47 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: win32 perl problem
Message-Id: <5ij1lv$ket@fridge-nf0.shore.net>
Levi Stamper (stamper@cybercash.com) wrote:
: I am using the w32 version of perl on NT4.0 (shipped with NT reskit),
: and can't get the simplest of things to work..
I know nothing about the Perl that was shipped with the reskit, but
I can tell you that @ARGV works just fine on all three versions of NT
Perl I've used from http://www.activeware.com (5.001m PL110, 5.003 303,
and 5.003 304).
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
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 270
*************************************
