[29651] in Perl-Users-Digest
Perl-Users Digest, Issue: 895 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Oct 1 18:14:18 2007
Date: Mon, 1 Oct 2007 15:14:07 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 1 Oct 2007 Volume: 11 Number: 895
Today's topics:
Re: the camel perl book <zaxfuuq@invalid.net>
Re: the camel perl book <zaxfuuq@invalid.net>
Re: the camel perl book <jgibson@mail.arc.nasa.gov>
Re: the camel perl book <zaxfuuq@invalid.net>
Re: the camel perl book <bik.mido@tiscalinet.it>
Re: the camel perl book <bik.mido@tiscalinet.it>
Re: the camel perl book <glennj@ncf.ca>
Re: the camel perl book <bik.mido@tiscalinet.it>
Re: The Modernization of Emacs: terminology buffer and <lasses_weil@klapptsowieso.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 1 Oct 2007 11:19:58 -0700
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: the camel perl book
Message-Id: <39ydnZzYiPDdsZzanZ2dnUVZ_v-hnZ2d@comcast.com>
plonk
--
wade ward
"The final irony is that cops
and rodney king have the same IQ."
"A. Sinan Unur" <1usa@llenroc.ude.invalid> wrote in message
news:Xns99BB7C6596E3Basu1cornelledu@127.0.0.1...
> "Wade Ward" <zaxfuuq@invalid.net> wrote in
> news:sc2dncoreJGVlmPbnZ2dnUVZ_gqdnZ2d@comcast.com:
>
>> I have questions from the
>> the camel perl book.
>>
>>
>> http://www.zaxfuuq.net/beatdowninabq1.htm
>>
>
> All your personalities belong to my killfile.
>
> Sinan
>
>
> --
> A. Sinan Unur <1usa@llenroc.ude.invalid>
> (remove .invalid and reverse each component for email address)
> clpmisc guidelines: <URL:http://www.augustmail.com/~tadmc/clpmisc.shtml>
>
------------------------------
Date: Mon, 1 Oct 2007 11:35:29 -0700
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: the camel perl book
Message-Id: <IP6dnTzE1ZN-spzanZ2dnUVZ_qGknZ2d@comcast.com>
"Sherm Pendley" <spamtrap@dot-app.org> wrote in message
news:m2r6kh1i0c.fsf@dot-app.org...
> "Wade Ward" <zaxfuuq@invalid.net> writes:
>
>> I have questions from the
>> the camel perl book.
>
> And your questions are...?
comment1) I wish that towelhead would lend me his headgear so I could dry
off my brand new perl refence that I left too close to my sink: wet.
scheisse.
q1) I've asked this q before, but without a reference, I can't see the
soln. How do I test a string literal for a given substring, e.g.
my string$ = "this is some text like scrabble; 'zax' is my favorite word;
quuf is a metasyntactic;"
how do i use the ppl to read the above in and output:
'zaxfuuq'.
thanks in advance, sherm.
q2)
http://www.zaxfuuq.net:80/beatdown3.htm
where did the eighty come from? not me
--
wade ward
"The final irony is that cops
and rodney king have the same IQ."
------------------------------
Date: Mon, 01 Oct 2007 13:44:42 -0700
From: Jim Gibson <jgibson@mail.arc.nasa.gov>
Subject: Re: the camel perl book
Message-Id: <011020071344421623%jgibson@mail.arc.nasa.gov>
In article <IP6dnTzE1ZN-spzanZ2dnUVZ_qGknZ2d@comcast.com>, Wade Ward
<zaxfuuq@invalid.net> wrote:
> q1) I've asked this q before, but without a reference, I can't see the
> soln. How do I test a string literal for a given substring, e.g.
perldoc -f index
>
> my string$ = "this is some text like scrabble; 'zax' is my favorite word;
> quuf is a metasyntactic;"
>
> how do i use the ppl to read the above in and output:
> 'zaxfuuq'.
What is 'ppl'? What logic extracts 'zaxfuuq' from your given string?
--
Jim Gibson
Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com
------------------------------
Date: Mon, 1 Oct 2007 15:01:45 -0700
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: the camel perl book
Message-Id: <zPCdncTo3_um_ZzanZ2dnUVZ_vihnZ2d@comcast.com>
"Jim Gibson" <jgibson@mail.arc.nasa.gov> wrote in message
news:011020071344421623%jgibson@mail.arc.nasa.gov...
> In article <IP6dnTzE1ZN-spzanZ2dnUVZ_qGknZ2d@comcast.com>, Wade Ward
> <zaxfuuq@invalid.net> wrote:
>
>> q1) I've asked this q before, but without a reference, I can't see the
>> soln. How do I test a string literal for a given substring, e.g.
>
> perldoc -f index
http://www.zaxfuuq.net/perl3.htm
Thanks for your reply. I realized that I can copy and paste that into the
command line. What am I supposed to see here? It looks like my buddy Stan
T. Rowlan getting a lobotomy, typing and having EXIT_FAILURE.
>> my string$ = "this is some text like scrabble; 'zax' is my favorite
>> word;
>> quuf is a metasyntactic;"
>>
>> how do i use the ppl to read the above in and output:
>> 'zaxfuuq'.
>
> What is 'ppl'?
The Perl Programming Language: ISO Perl.
What logic extracts 'zaxfuuq' from your given string?
Now I'm going to try to type. My hands are injured. There's two different
eparts fo uit . Firts of all, you have zax. then you have quuf. you have
to turn quuf around and concatenate it it so something like:
my result$='initial'
my tja$='zax'
my hja$='quuf'
my swap$ = hja$ backwards
my result$= concatenate (tja, swap)$$$$?
--
wade ward
"The final irony is that cops
and rodney king have the same IQ."
------------------------------
Date: Mon, 01 Oct 2007 23:08:45 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: the camel perl book
Message-Id: <t9o2g31pen0g9i6vpjfdpvkc4s2m3bcsi0@4ax.com>
On Mon, 1 Oct 2007 11:35:29 -0700, "Wade Ward" <zaxfuuq@invalid.net>
wrote:
>q1) I've asked this q before, but without a reference, I can't see the
>soln. How do I test a string literal for a given substring, e.g.
index(), which is a specialized tool for this, or m//, which is a
generic one
>my string$ = "this is some text like scrabble; 'zax' is my favorite word;
>quuf is a metasyntactic;"
>
>how do i use the ppl to read the above in and output:
BTW: what is the "ppl"?
>'zaxfuuq'.
This is a different task than what you described above. It is still
not clear according to which criteria you want to extract 'zaz' and
'quuf' from the above, but you probably want to learn about m// and,
since you reverse quuf into fuuq, about reverse().
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Mon, 01 Oct 2007 23:11:56 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: the camel perl book
Message-Id: <dio2g35837recfiakg90d1b5s73fop1gmh@4ax.com>
On Mon, 1 Oct 2007 11:19:58 -0700, "Wade Ward" <zaxfuuq@invalid.net>
wrote:
>plonk
>
>--
>wade ward
>"The final irony is that cops
>and rodney king have the same IQ."
>"A. Sinan Unur" <1usa@llenroc.ude.invalid> wrote in message
>news:Xns99BB7C6596E3Basu1cornelledu@127.0.0.1...
>> "Wade Ward" <zaxfuuq@invalid.net> wrote in
>> news:sc2dncoreJGVlmPbnZ2dnUVZ_gqdnZ2d@comcast.com:
>>
>>> I have questions from the
>>> the camel perl book.
>>>
>>>
>>> http://www.zaxfuuq.net/beatdowninabq1.htm
>>>
>>
>> All your personalities belong to my killfile.
>>
>> Sinan
I've been tolerating you till now, but such an irrespectful behaviour
is bringing me very near to plonking you too. Honestly I can't
understand most of your posts, and their humour, if that's humour.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: 1 Oct 2007 21:38:13 GMT
From: Glenn Jackman <glennj@ncf.ca>
Subject: Re: the camel perl book
Message-Id: <slrnfg2q67.4jn.glennj@smeagol.ncf.ca>
At 2007-10-01 06:01PM, "Wade Ward" wrote:
> "Jim Gibson" <jgibson@mail.arc.nasa.gov> wrote in message
> news:011020071344421623%jgibson@mail.arc.nasa.gov...
> > In article <IP6dnTzE1ZN-spzanZ2dnUVZ_qGknZ2d@comcast.com>, Wade Ward
> > <zaxfuuq@invalid.net> wrote:
> > perldoc -f index
>
> Thanks for your reply. I realized that I can copy and paste that into the
> command line. What am I supposed to see here? It looks like my buddy Stan
> T. Rowlan getting a lobotomy, typing and having EXIT_FAILURE.
Well, what _do_ you see?
http://search.cpan.org/dist/perl/pod/perlfunc.pod
> >> my string$ = "this is some text like scrabble; 'zax' is my favorite
> >> word;
> >> quuf is a metasyntactic;"
> >>
> >> how do i use the ppl to read the above in and output:
> >> 'zaxfuuq'.
[...]
> What logic extracts 'zaxfuuq' from your given string?
> Now I'm going to try to type. My hands are injured.
In that case, you may want to avail yourself of a spelling checker.
[...]
> my result$='initial'
Dude, make an effort. "result$" is not Perl.
--
Glenn Jackman
"You can only be young once. But you can always be immature." -- Dave Barry
------------------------------
Date: Mon, 01 Oct 2007 23:43:33 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: the camel perl book
Message-Id: <srp2g3huc0smbor9bfr522f42v77vjhaae@4ax.com>
On Mon, 1 Oct 2007 15:01:45 -0700, "Wade Ward" <zaxfuuq@invalid.net>
wrote:
>>> q1) I've asked this q before, but without a reference, I can't see the
>>> soln. How do I test a string literal for a given substring, e.g.
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
>> perldoc -f index
>http://www.zaxfuuq.net/perl3.htm
>Thanks for your reply. I realized that I can copy and paste that into the
>command line. What am I supposed to see here? It looks like my buddy Stan
The documentation of the index function(), which does exactly what you
asked about above. Thus
C:\temp>perl -lpe "$_=index($_,'anal')>=0 ? 'ok' : 'not ok'"
mathematical analysis
ok
Sandra Romain iz an anal queen
ok
Wade Ward iz boring and annoying
not ok
>T. Rowlan getting a lobotomy, typing and having EXIT_FAILURE.
Huh?!?
>> What is 'ppl'?
>The Perl Programming Language: ISO Perl.
Huh?!? Not such a thing. Please simply write perl, or Perl: there's a
slight difference, but as long as you don't write PERL you won't be
bashed. But ppl is 100% likely to cause people to look at you
astonished.
>What logic extracts 'zaxfuuq' from your given string?
>Now I'm going to try to type. My hands are injured. There's two different
>eparts fo uit . Firts of all, you have zax. then you have quuf. you have
>to turn quuf around and concatenate it it so something like:
>
>my result$='initial'
>my tja$='zax'
>my hja$='quuf'
>my swap$ = hja$ backwards
>my result$= concatenate (tja, swap)$$$$?
You still failed to explain how the zaxfuuq is extracted from the
given string which is what that was asked to you.
Secondly, sigils prefix identifiers and not vice versa. At least in
current Perl.
(One could also remind that statements must end with a semicolon, but
at this point...)
Third:
my $tja = 'zax';
my $hja = 'quuf';
my $result = $tja . reverse $hja;
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Mon, 01 Oct 2007 23:37:28 +0200
From: Wildemar Wildenburger <lasses_weil@klapptsowieso.net>
Subject: Re: The Modernization of Emacs: terminology buffer and keybinding
Message-Id: <47016899$0$4524$9b4e6d93@newsspool3.arcor-online.net>
Frank Goenninger wrote:
> On 2007-09-29 01:27:04 +0200, Damien Kick <dkixk@earthlink.net> said:
>
>> If you were referring to the "free" in "free Mumia Abu Jamal", I would
>> agree with you. I don't think anyone would imagine that this phrase
>> meant that someone was going to get Mumia Abu Jamal gratis. Like it
>> or not, "free software" referring to "free as in beer" is probably the
>> most common interpretation of the phrase for a native English speaker.
>> Admittedly, I do not have a "scientific" survey handy. However, I
>> just asked my wife--who has absolutely no interest in anything related
>> to programming, has never heard of the FSF, Eric Raymond, nor the
>> disagreement between those two camps, nor probably will she ever have
>> an interest--what she thinks I mean when I say "free software". After
>> getting over the "why are you asking such a stupid question" phase,
>> the first thing that jumped to her mind was "free as in beer". You
>> can stamp, growl, swagger, spit, curse, and bluster all you want on
>> this point, but millions of English speakers are going to ignore you
>> anyway. Lucky for most of them, they do not have to suffer the
>> lectures of sociopolitically motivated language mavens trying to
>> "correct" them from the error of mistaking the meaning of a phrase to
>> be the normal meaning of that phrase.
>
> Fully true for non-native English speakers as well. Just did the "wife
> test" also - she is a pure software user - and yes, free is "no money,
> do what you want" and that's it.
>
> I *never* use the term "free" if I don't want to imply "free beer"
> (which is a Good Thing and as such highly valuated - ask any Bavarian).
> Using "free" as by FSF or any other lawyer-style 6 pixel font printed
> phrasing is pure perfidiousness.
>
I appearantly missed a lot of that conversation, but what is your point?
While I agree that the word "free" implies "free of monetary cost" to
many people societies, that is by no means set in stone (talk to native
americans, blacks, jews, palestinians, etc. about the word free, see
what they have to say).
But that aside: The word free with respect to the FSF and GPL have a
perfectly well defined meaning. People may misunderstand that from not
knowing the definition but that doesnt make it any less well defined.
Again, why this discussion?
/W
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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.
#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 V11 Issue 895
**************************************
