[8124] in Perl-Users-Digest
Perl-Users Digest, Issue: 1742 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jan 27 16:17:33 1998
Date: Tue, 27 Jan 98 13:01:39 -0800
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, 27 Jan 1998 Volume: 8 Number: 1742
Today's topics:
Re: perl4, solaris, varargs (Greg Bacon)
Re: Please define the usage in this example. (Mike D. Kail)
Re: Please define the usage in this example. <rootbeer@teleport.com>
Re: print<< into variable? <xxTony.Curtis@vcpc.univie.ac.at>
Re: print<< into variable? <dagon@halcyon.com>
Re: print<< into variable? (Greg Bacon)
Re: print<< into variable? <ebohlman@netcom.com>
Re: print<< into variable? (Tony L. Svanstrom)
Re: print<< into variable? <ajohnson@gpu.srv.ualberta.ca>
Re: print<< into variable? (Adam Donahue)
Re: printing an image (brian d foy)
Re: Profiler for Perl4 (yup. Perl4) <rootbeer@teleport.com>
Re: puzzling result from hex() (Chip Salzenberg)
Re: READ THIS FIRST (Chip Salzenberg)
Re: Remove elements of array1 from array2. (Greg Bacon)
Re: Sending binary files on a Socket. There has to be a <w.stanton@auckland.ac.nz>
Re: ssh <shimpei+this+address+is+NOT+munged+.mil+.gov@socrates.caltech.edu>
Re: Strip Trailing Spaces. How? (Chip Salzenberg)
Re: Strip Trailing Spaces. How? <vallon@pearl.fi.bear.com>
Re: Survival Of perl (Ilya Zakharevich)
Re: Survival Of perl (Frank)
Re: Survival Of perl (Chip Salzenberg)
Re: Survival Of perl <tchrist@mox.perl.com>
Re: Survival Of perl (Chris Nandor)
unix command pipes <sja3@columbia.edu>
Re: White Hats and Black (Andrew Williams)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 27 Jan 1998 18:50:15 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
To: Tony Finch <fanf@demon.net>
Subject: Re: perl4, solaris, varargs
Message-Id: <6ala97$kgh$2@info.uah.edu>
[Posted and mailed]
In article <6akvpm$4fp$1@info.noc.demon.net>,
Tony Finch <fanf@demon.net> writes:
: Our customers want to be able to use perl 4 for their CGI scripts, so
[...]
Do your customers a favor. Jump, scream, and shout at them if you have
to. There are security problems (just browse your favorite CERT
archive) in all major perl releases up to 5.004.
Keep in mind that there is a reason you find the source to version 4
under a directory called `unsupported' in the CPAN. You'll be lucky to
find anyone even in clpm who'll be willing to help you with version 4.
Maybe there should be an RFD for comp.lang.perl.v4. :-)
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: 27 Jan 1998 20:01:04 GMT
From: mdkail@fv.com (Mike D. Kail)
Subject: Re: Please define the usage in this example.
Message-Id: <slrn6csffd.212.mdkail@dime.fv.com>
On Tue, 27 Jan 1998 01:41:42 -0500, brian d foy <comdog@computerdog.com> wrote:
>In article <slrn6cqqbp.5oi.mdkail@dime.fv.com>, mdkail@fv.com posted:
>>i guess you didn't read the perlvar man page...
>>
>>[...]
>> $# The output format for printed numbers. This
>> variable is a half-hearted attempt to emulate awk's
>> OFMT variable.
>
>is this a serious post?
<blush>
yes and no, i cut-and-pasted the wrong thing :-\
--
/*-------------------------------------------------------------*/
/* Mike D. Kail | voice: (619) 350-3524 */
/* Unix System Architect | fax: (619) 793-2950 */
/* FIRST VIRTUAL Holdings Inc. | e-mail: mdkail@fv.com */
/*-------------------------------------------------------------*/
------------------------------
Date: Tue, 27 Jan 1998 12:10:12 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: "Mike D. Kail" <mdkail@fv.com>
Subject: Re: Please define the usage in this example.
Message-Id: <Pine.GSO.3.96.980127120942.22373R-100000@user2.teleport.com>
On 27 Jan 1998, Mike D. Kail wrote:
> > foreach $i(0..$#in_key){
> $# The output format for printed numbers.
Not in this case. Thanks for trying, though! :-)
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 27 Jan 1998 19:58:01 +0100
From: Remove xx to reply <xxTony.Curtis@vcpc.univie.ac.at>
To: kisrael@allegro.cs.tufts.edu
Subject: Re: print<< into variable?
Message-Id: <7xafch922u.fsf@beavis.vcpc.univie.ac.at>
Re: print<< into variable?, Kirk
<kisrael@allegro.cs.tufts.edu> said:
Kirk> Is there any way to use the print<<__EndOfQuote__
Kirk> syntax to print into a variable directly, rather than
Kirk> to a file handle? (eg STDOUT)
It's not restricted to "print", the mechanism is much more
general.
$var = <<EOT;
value
EOT
Kirk> And what is the print<< syntax referred to in the html
Kirk> documentation that comes with perl? I found the binary
Kirk> shift, but not this kind of redirection.
It's known as "here", and derives from shell scripts. Try
the "sh" man page, that might help, at least in a historical
sense... :-)
hth,
tony
------------------------------
Date: 27 Jan 1998 10:55:03 -0800
From: Mark Rafn <dagon@halcyon.com>
Subject: Re: print<< into variable?
Message-Id: <6alai7$i57$1@halcyon.com>
[CC'd and posted]
kisrael@allegro.cs.tufts.edu arranged electrons in a pattern like this:
>Is there any way to use the print<<__EndOfQuote__
>syntax to print into a variable directly, rather
>than to a file handle? (eg STDOUT)
Of course.
$myVar = <<"_end_"
your code here \$10
_end_
;
>And what is the print<< syntax referred to in the html documentation
>that comes with perl? I found the binary shift, but not this kind
>of redirection.
This is not redirection, it's quoting. Look up perldata ('twould be
"perldoc perldata" for the normal docs, and it's probably similar for
your HTML version), and pay attention to quoting rules and "here documents".
Good luck!
--
#!/usr/bin/perl -- # Mark Rafn dagon@halcyon.com http://www.halcyon.com/dagon/
&ja('&*MQ))U=@','&*HBM4E90','&JDCK4G1@','&1,BI(E=0');&ja('&SLBD:NP`',
'&K*BJC,H`','&R,CNBHP`','&CJRJ:NH`');sub ja{for$c(@_){$d=unpack('B48',
unpack('u',$c));$d=~tr/10/@ /;print"$d\n"}print"\n"}
------------------------------
Date: 27 Jan 1998 19:18:04 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: print<< into variable?
Message-Id: <6albtc$kgh$5@info.uah.edu>
[Posted and mailed]
In article <6al7q4$gae$1@news3.tufts.edu>,
kisrael@allegro.cs.tufts.edu (Kirk Is) writes:
: Is there any way to use the print<<__EndOfQuote__
: syntax to print into a variable directly, rather
: than to a file handle? (eg STDOUT)
Err, kind of..
$foo = <<EOF;
This will go into \$foo.
EOF
: And what is the print<< syntax referred to in the html documentation
: that comes with perl? I found the binary shift, but not this kind
: of redirection.
% grep -i 'here document' \
`perl -MConfig -le 'print $ Config{installprivlib}'`/pod/*.pod
Looooooooooove that csh. :-)
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: Tue, 27 Jan 1998 18:49:53 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: print<< into variable?
Message-Id: <ebohlmanEnGHn5.GEJ@netcom.com>
Kirk Is <kisrael@allegro.cs.tufts.edu> wrote:
: Is there any way to use the print<<__EndOfQuote__
: syntax to print into a variable directly, rather
: than to a file handle? (eg STDOUT)
Yes, though you don't say "print," of course (well, unless you're using a
tied filehandle...).
: And what is the print<< syntax referred to in the html documentation
: that comes with perl? I found the binary shift, but not this kind
: of redirection.
It's not actually a form of redirection. It's technically known as
"here-document" or "here-doc" syntax, and is described in perldata (under
the name "here-doc").
Here's an example not involving a print statement:
my $stanza=<<EOS;
'twas brillig and the slithy toves
did gyre and gimble in the wabe
all mimsy were the borogoves
and the mome raths outgrabe
EOS
$stanza =~ s/mimsy/mimsey/;
------------------------------
Date: Tue, 27 Jan 1998 20:51:35 +0100
From: tony@svanstrom.com (Tony L. Svanstrom)
Subject: Re: print<< into variable?
Message-Id: <1d3j8e0.1y30tdu3db3o0N@du117-253.ppp.algonet.se>
Kirk Is <kisrael@allegro.cs.tufts.edu> wrote:
> Is there any way to use the print<<__EndOfQuote__
> syntax to print into a variable directly, rather
> than to a file handle? (eg STDOUT)
>
> And what is the print<< syntax referred to in the html documentation
> that comes with perl? I found the binary shift, but not this kind
> of redirection.
I have a question about this to:
What if I want to "print" to a variable a couple of times and I don't
want to replace the information already in it?
Right now I'm trying to rewrite a script that uses print to send some
information to sendmail, I'd rather save it somewhere and then send it
all to sendmail at the same time instead of a line at a time like it is
now.
/Tony
--
/\___/\
\_@ @_/
---------------------oOO-(_)-OOo----------------------
"We only live to please those we love" -- Aphrael
----------------------ttt---ttt-----------------------
http://tls.base.org \O/ \O/ )Tony Svanstrom 1997
------------------------------
Date: Tue, 27 Jan 1998 14:35:23 -0600
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: print<< into variable?
Message-Id: <34CE450B.C6693C3@gpu.srv.ualberta.ca>
Tony L. Svanstrom wrote:
>
> Kirk Is <kisrael@allegro.cs.tufts.edu> wrote:
>
> > Is there any way to use the print<<__EndOfQuote__
> > syntax to print into a variable directly, rather
> > than to a file handle? (eg STDOUT)
> >
> > And what is the print<< syntax referred to in the html documentation
> > that comes with perl? I found the binary shift, but not this kind
> > of redirection.
>
> I have a question about this to:
>
> What if I want to "print" to a variable a couple of times and I don't
> want to replace the information already in it?
if we stop thinking of this as 'printing' to a variable
we might realize that we are simply assigning strings to
a variable, and hence we might consider something like
string concatenation to be the solution to such a
question:
#!/usr/bin/perl -w
$var=<<End_of_Mail;
blah blah
blah blah
blah
End_of_Mail
print "$var------------\n";
$var.=<<More_Mail;
and besides
blah blah blah
so there
More_Mail
print $var;
__END__
hope it helps
regards
andrew
------------------------------
Date: 27 Jan 1998 20:32:50 GMT
From: donahue@acf2.nyu.edu (Adam Donahue)
Subject: Re: print<< into variable?
Message-Id: <6alg9i$nb8$1@news.nyu.edu>
I think the here document notation can be used in any scalar context
(though I'm not certain, so don't quote me on that). I do know
you can assign it to a variable like this:
$myvar = <<FOO;
blah
blah
blah
FOO
;
Adam
Kirk Is (kisrael@allegro.cs.tufts.edu) wrote:
: Is there any way to use the print<<__EndOfQuote__
: syntax to print into a variable directly, rather
: than to a file handle? (eg STDOUT)
:
: And what is the print<< syntax referred to in the html documentation
: that comes with perl? I found the binary shift, but not this kind
: of redirection.
:
:
: --
: Kirk Israel - kisrael@cs.tufts.edu - http://www.alienbill.com
: "Notice I didn't say 'TV'. 'TV' is a nickname. Nicknames are for friends.
: Television is not your friend." --Mr.Show
--
Adam Donahue / mailto:adam@cyber-guru.com
------------------------------
Date: Tue, 27 Jan 1998 14:49:15 -0500
From: comdog@computerdog.com (brian d foy)
Subject: Re: printing an image
Message-Id: <comdog-ya02408000R2701981449150001@news.panix.com>
Keywords: from just another new york perl hacker
In article <34CDD74A.74E55D21@internetmci.com>, George Cyriac <gcyriac@internetmci.com> posted:
>How do I print an image out to a web browser?
the same way we told the last ten people who asked this question
to do it. however, since this is not a perl issue, you might
want to take further questions to comp.infosystems.www.authoring.cgi.
good luck :)
--
brian d foy <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
------------------------------
Date: Tue, 27 Jan 1998 12:40:17 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: bernie@techwriter.com
Subject: Re: Profiler for Perl4 (yup. Perl4)
Message-Id: <Pine.GSO.3.96.980127123924.22373Y-100000@user2.teleport.com>
On Tue, 27 Jan 1998 bernie@techwriter.com wrote:
> I'm familiar with various profilers for Perl5, but I haven't found one
> for Perl4.
It's called "perl5". Install that, and you'll get a lot more than a
profiler. Or do you still use whale oil in your lamps? :-)
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 27 Jan 1998 20:16:47 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: puzzling result from hex()
Message-Id: <6alfet$1mj$1@cyprus.atlantic.net>
According to Nathan Franzen <franzen@pmel.noaa.gov>:
>And shouldn't the result of the mod operator (%) *always* be positive?
No. However, you may wish to upgrade to Perl 5.004_04. We spent
a lot of time on modulo, getting it exactly right.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Tue, 27 Jan 1998 19:42:22 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: READ THIS FIRST
Message-Id: <6aldeg$1em$1@cyprus.atlantic.net>
According to enrold@aol.com (ENROLD):
[nothing worth reproducing]
Don't support spammers, folks.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
-> Ask me about Perl training and consulting <-
"We can shower it with neutrons."
"Or we can do the Neutron Dance!" // MST3K
------------------------------
Date: 27 Jan 1998 19:05:37 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: Remove elements of array1 from array2.
Message-Id: <6alb61$kgh$4@info.uah.edu>
[Posted and mailed]
In article <34CE0A49.5FBA09E2@ms.com>,
Shaun Ledford <shaun@ms.com> writes:
: Is there a clean way of removing the elements of hash table 1 ( login
: name ) from hash table 2 ( names and password file )?
delete @hash2{ keys %hash1 };
Hope this helps,
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: 28 Jan 1998 08:58:50 +1200
From: Worik Macky Stanton <w.stanton@auckland.ac.nz>
Subject: Re: Sending binary files on a Socket. There has to be a better way.
Message-Id: <wku3apiqgl.fsf@auckland.ac.nz>
"Joseph N. Hall" <joseph@5sigma.com> writes:
>
> Why don't you send the length of the data you want to send,
No problem sending the data.
The problem is reading it.
I can do it with repeated calls to getc
I can not do it with sysread
> then send that much data. Or just send the data and then close
> the socket.
>
> -joseph
How much overhead is there to opening and closing a socket?
I am wanting to do this (perhaps) hundreds of times as part of an
initialisation procedure, with often quite small binary files. I
think I do not want to be opening and closing a socket anymore than I
want to be making millions of calls to getc.
Worik
>
> --
> Joseph N. Hall, prop., 5 Sigma Productions mailto:joseph@5sigma.com
> Author, Effective Perl Programming . . . . . http://www.effectiveperl.com
> Perl Training . . . . . . . . . . . . . . . http://www.perltraining.com
------------------------------
Date: 27 Jan 1998 20:46:27 GMT
From: Shimpei Yamashita <shimpei+this+address+is+NOT+munged+.mil+.gov@socrates.caltech.edu>
Subject: Re: ssh
Message-Id: <6alh33$31j@gap.cco.caltech.edu>
Mike D. Kail <mdkail@fv.com> writes:
>
>On Mon, 26 Jan 1998 16:57:40 -0600, Thomas Lockney
><media@organizedmedia.com> wrote:
>>
>>I'm looking for a module or any information pertaining to ssh within
>>perl. I need to replicate a directory tree across a systems, one of
>>which is using ssh. I don't want to have to make system calls to scp
>>each time I find a file needing to be copied. Anyone have any experience
>>with this?
>
>NOTE: this has *nothing* to do with perl
Well, it sorta does. It would be nice if the ssh functionality was
reduced to a library and someone wrote a perl interface for it, no?
That would solve his problem. I'd probably find a use for it, too.
A recent thread in comp.security.ssh seemed to imply this would be very
difficult (at least using the existing ssh codebase), however, since
ssh isn't written in a modular fashion. Sad.
--
Shimpei Yamashita <http://www.patnet.caltech.edu/%7Eshimpei/>
The address I have listed in the headers is a working address. It just
looks like it's an invalid address in order to fool spammers collecting
addresses from newsgroups.
------------------------------
Date: Tue, 27 Jan 1998 20:06:32 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Strip Trailing Spaces. How?
Message-Id: <6alerm$1jq$1@cyprus.atlantic.net>
According to Tom Lewis <tglewis@mindspring.com>:
>I am new to Perl programming. All I need to do is strip trailing spaces
>from a string. I was wondering if there is a easy, predefined way of
>doing it?
Yes. It's in part four of the FAQ:
perlfaq4.pod:
=head2 How do I strip blank space from the beginning/end of a string?
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
-> Ask me about Perl training and consulting <-
"We can shower it with neutrons."
"Or we can do the Neutron Dance!" // MST3K
------------------------------
Date: 27 Jan 1998 15:05:54 -0500
From: Justin Vallon <vallon@pearl.fi.bear.com>
Subject: Re: Strip Trailing Spaces. How?
Message-Id: <x6elnw1n0m5.fsf@pearl.fi.bear.com>
Ack!
$string = "Perl is expressive ";
# Replace sequence of trailing blanks with nothing.
$string =~ s/ +$//;
print "$string\n";
bjorn@hobbe.lub.lu.se (Bjorn Ardo) writes:
> In article <34CE094C.49DD2902@mindspring.com>,
> Tom Lewis <tglewis@mindspring.com> writes:
> > I am new to Perl programming. All I need to do is strip trailing spaces
> > from a string. I was wondering if there is a easy, predefined way of
> > doing it?
> >
>
> Don't know if it is predefinded but this should do the job:
>
> $string = "Perl is great ";
> if ($string =~ /(.*?)[ ]+$/)
> {print $1;}
{ $string = $1; }
>
> Bjorn
--
-Justin
vallon@bear.com
------------------------------
Date: 27 Jan 1998 19:07:54 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Survival Of perl
Message-Id: <6albaa$q2t$3@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Chip Salzenberg
<chip@pobox.com>],
who wrote in article <6aj1ji$d29$1@cyprus.atlantic.net>:
> According to FHeasley@chemistry.com (Frank):
> >The cutting edge is a very small part of the knife, but it's the place
> >where the action is. The web is the cutting edge for perl.
>
> Bollocks. The web is lame. The web is boring. The web is nothing
> more or less than producing formatted text on demand.
Applauds!
> The cutting edge is Perl compilation and distributed safe Perl code
> and better regexes and better performance and more reliability and
> faster bug fixes and better support and modules and more modules and
> MORE MODULES to do all kinds of neat stuff.
Ovations!
> The web could die tomorrow and Perl would live on, hardly noticing.
I found a couple of Web-based Perl resources usable, but the margins
of this message are too small to even care to remember what these
resources were.
On the other hand, FTP is indespensable as Perl-related resource.
Ilya
------------------------------
Date: Tue, 27 Jan 1998 19:07:36 GMT
From: FHeasley@chemistry.com (Frank)
Subject: Re: Survival Of perl
Message-Id: <34d02cd4.13812179@news.halcyon.com>
(Frank picks himself up off the stage and begins to pick off the
rotten vegetables)
Whew! Seems I struck a nerve - ok, now that the dust is beginning to
settle a bit, it's time to set a few things straight.
1. I LIKE perl. I wouldn't bother learning, or using, it if I
didn't.
2. I'm not complaining, or even whining about perl. (OK, maybe I'm
whimpering a bit).
3. Yes, I'm good at stating the obvious. It's a talent that has
served me well. Many people have problems seeing things that are very
obvious, particularly when they are very close to the subject. (Try
visualizing your own face sometime).
4. I'm also fairly good at predicting some trends, and I've got a
pretty strong feeling about this one.
Perl's new users tend to be web oriented, and the web is huge. Yes,
much of it is banal or worse, and much of the perl programming that
goes into making the web run is trivial. So what?
Many here may find it surprising that most new internet users consider
the web to be the WHOLE internet. This belief is fostered by
Microsoft, which calls its IE icon "The Internet". Nothing could be
farther from the truth, but there it is. That's marketing folks, and
it's the evil driving force behind most social and business trends.
Depending on how you look at it, the web is either a problem, or an
opportunity for perl. I see it as an opportunity, for the time being.
Later on, it could become a problem. However, no amount of verbiage
is going to make it go away.
Frank
------------------------------
Date: Tue, 27 Jan 1998 19:31:35 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Survival Of perl
Message-Id: <6alcq9$1c1$1@cyprus.atlantic.net>
According to FHeasley@chemistry.com (Frank):
>Depending on how you look at it, the web is either a problem, or an
>opportunity for perl. I see it as an opportunity, for the time being.
>Later on, it could become a problem. However, no amount of verbiage
>is going to make it go away.
>
And this disagrees with others' comments ... how?
The web is not Perl's cutting edge, but it *is* its primary draw
to the non-Perl-aware public. For now.
Does this fact imply some action on our part?
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
-> Ask me about Perl training and consulting <-
"We can shower it with neutrons."
"Or we can do the Neutron Dance!" // MST3K
------------------------------
Date: 27 Jan 1998 18:29:16 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Survival Of perl
Message-Id: <6al91s$c0o$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, dg50@chrysler.com writes:
:[ Who's post should be taken
Whose post?
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
"Big Brother is hallucinating."
--Elizabeth D Zwicky (zwicky@cis.ohio-state.edu), title of a comp.risks article
------------------------------
Date: Tue, 27 Jan 1998 15:29:26 -0500
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Survival Of perl
Message-Id: <pudge-2701981529260001@ppp-37.ts-1.kin.idt.net>
In article <34d02cd4.13812179@news.halcyon.com>, FHeasley@chemistry.com
(Frank) wrote:
# 4. I'm also fairly good at predicting some trends, and I've got a
# pretty strong feeling about this one.
#
# Perl's new users tend to be web oriented, and the web is huge. Yes,
# much of it is banal or worse, and much of the perl programming that
# goes into making the web run is trivial. So what?
Hm. Well, I wish you luck in your fortune-telling career. There's a nice
striped tent around the corner where you can set up shop ... have you got
your crystal ball yet?
I see no evidence that new perl users are web-oriented. Maybe this is
true. But it is irrelevant to your point, which seems to be that Perl
should cater to these people.
If someone is not keen enough to learn how to install a module on Win32
perl, he is too dangerous to be using said modules.
If someone is using perl only for the web, then he either has no use for
programming in general or, again, he is not keen enough to do anything
else. In either case, I would hardly call this the cutting edge.
Is there room for improvement? Of course. That is why there is a group
of porters working year-round to make it better. That is why O'Reilly and
ActiveWare and Cygnus work on tools to make things easier.
And as far as it getting stomped on by monster corporations, I look for
that to happen around the same time Windows stomps out Linux, and Netscape
and IIS stomp out Apache, and Java stomps out C and C++, and French stomps
out English. :)
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10 1FF7 7F13 8180 B6B6'])
#== New Book: MacPerl: Programming for the Rest of Us ==#
#== Publishing Date: Early 1998. http://www.ptf.com/macperl/ ==#
------------------------------
Date: Tue, 27 Jan 1998 15:46:16 -0500
From: Sonya Allin <sja3@columbia.edu>
Subject: unix command pipes
Message-Id: <Pine.GSO.3.95L.980127154240.17274B-100000@bonjour.cc.columbia.edu>
hey --
right now i am trying to write a line of code in perl which will pipe the
output of a 'find' into a filehandle.
this is what my code looks like:
print "What is the name of the directory you want to search?";
$directory=<STDIN>;
print "What is the word you want to search for?";
$word=<STDIN>;
print "What word do you want to replace this word with?";
$replacement=<STDIN>;
open (FIND, "find $directory -print |") || die "Couldn't find $directory!
\n";
and then there's a little more.
when i try to run my program at the command line, I write:
./myprogram.pl
every time i try this, however, i get the error message
'permission denied'.
i have chmod-ed my program so that it should be executable by anyone and
everyone. what, then could be wrong? could it be that my version of unix
doesn't support file piping? is there something else i can check?
thanks for any and all input...
Sonya A
------------------------------
Date: Tue, 27 Jan 1998 20:45:07 GMT
From: andrew@edoc.com (Andrew Williams)
Subject: Re: White Hats and Black
Message-Id: <34d74735.435280953@news.clark.net>
On Tue, 27 Jan 1998 05:19:14 GMT, chip@mail.atlantic.net (Chip
Salzenberg) wrote:
>According to Myles Barrett Williams <a@b.c.d>:
>>It looks to me like Netscape is just trying to quit the browser
>>business without anyone knowing.
>
>More to the point, they're doing whatever it takes to keep Microsoft
>from owning the Internet. It's not altruism, or at least not most of
>it. Rather, it's a recognition that only the free software community
>can save the Internet from doom.
>
This really does have alot to do with perl . . . .
------------------------------
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 1742
**************************************
