[28175] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 9539 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 31 00:06:11 2006

Date: Sun, 30 Jul 2006 21:05:09 -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           Sun, 30 Jul 2006     Volume: 10 Number: 9539

Today's topics:
        ANNOUNCE:  Perl6-Say-0.06 <jkeen_via_google@yahoo.com>
    Re: Beginner: read in lines array1 and after keyword ar <mstep@t-online.de>
    Re: Beginner: read in lines array1 and after keyword ar <bik.mido@tiscalinet.it>
    Re: Beginner: read in lines array1 and after keyword ar <mstep@t-online.de>
    Re: Beginner: read in lines array1 and after keyword ar <benmorrow@tiscali.co.uk>
    Re: Semantics of threads <blgl@stacken.kth.se>
    Re: Semantics of threads <benmorrow@tiscali.co.uk>
    Re: Sending data from perl to gnuplot and getting an "A <a24061@yahoo.com>
    Re: What is "or equal" in perl? Thanks <mumia.w.18.spam+nospam.usenet@earthlink.net>
    Re: What is "or equal" in perl? Thanks <ongtiongheng@gmail.com>
    Re: What is "or equal" in perl? Thanks <ongtiongheng@gmail.com>
    Re: What is "or equal" in perl? Thanks usenet@DavidFilmer.com
    Re: What is "or equal" in perl? Thanks <someone@example.com>
    Re: What is "or equal" in perl? Thanks <mgarrish@gmail.com>
    Re: What is "or equal" in perl? Thanks <mumia.w.18.spam+nospam.usenet@earthlink.net>
        why perl over more "powerful" stuff liek lisp haskell s <bootiack@yahoo.com>
    Re: why perl over more "powerful" stuff liek lisp haske <bik.mido@tiscalinet.it>
    Re: why perl over more "powerful" stuff liek lisp haske <john@castleamber.com>
    Re: why perl over more "powerful" stuff liek lisp haske <bootiack@yahoo.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Sun, 30 Jul 2006 18:52:58 GMT
From: James E Keenan <jkeen_via_google@yahoo.com>
Subject: ANNOUNCE:  Perl6-Say-0.06
Message-Id: <J38y8n.sGy@zorch.sf-bay.org>

I have been designated co-maintainer of Perl6-Say by Damian Conway and have
released version 0.06 to CPAN.  You may obtain it at
http://search.cpan.org/dist/Perl6-Say/.

I fixed one bug in a test file that was causing failures during automated
testing.  I added some documentation and significantly enlarged the test
suite.  In addition, say() should now work properly where the current
filehandle is select-ed after being opened.

Please send feedback to my CPAN address listed in the module's documentation
or Makefile.PL (i.e., not to the address from which this posting has come).
Please send bug reports via rt.cpan.org.  Thank you very much.

Jim Keenan




------------------------------

Date: Sun, 30 Jul 2006 16:26:55 +0200
From: Marek Stepanek <mstep@t-online.de>
Subject: Re: Beginner: read in lines array1 and after keyword array2
Message-Id: <C0F28E4F.28DBB%mstep@t-online.de>

On 30.07.2006 14:27, in article f69pc29sd6pkgt7gqhb7io5ot45g6bjjc3@4ax.com,
"Michele Dondi" <bik.mido@tiscalinet.it> wrote:

> On 30 Jul 2006 14:07:06 +0200, Michele Dondi <bik.mido@tiscalinet.it>
> wrote:
> 
>  my (@lines1, @lines2);
>  while (<DATA>)
>  {
>      last if /keyword/;
>      push @lines1, $_;
>  }
>  @lines2=<DATA>;
> 
 ...
> 
>   push @{ 1../keyword/ ? \@lines1 : \@lines2 }, $_ while <>;
> 
> 
> Michele


Hello Michele, 


thank you! This was a great help. The second solution is so tricky, that I
hardly understand, what's going on there. And I take the second one, it
looks so professional :-)


greetings from Munich


marek






------------------------------

Date: 30 Jul 2006 16:58:11 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Beginner: read in lines array1 and after keyword array2
Message-Id: <81gpc25j6cgnvtnc8crphgib802dg4n4ph@4ax.com>

On Sun, 30 Jul 2006 16:26:55 +0200, Marek Stepanek <mstep@t-online.de>
wrote:

>>  my (@lines1, @lines2);
>>  while (<DATA>)
>>  {
>>      last if /keyword/;
>>      push @lines1, $_;
>>  }
>>  @lines2=<DATA>;
>> 
>...
>> 
>>   push @{ 1../keyword/ ? \@lines1 : \@lines2 }, $_ while <>;
[snip]
>thank you! This was a great help. The second solution is so tricky, that I
>hardly understand, what's going on there. And I take the second one, it
>looks so professional :-)

I called it "funky", and I don't know if it looks professional or not:
whatever, I would beware of it. In fact it involves referencing and
dereferencing and I expect it to be less performant than the former,
although generally this is not a problem since we recommend not to go
mad over micro-optimization all the time, anyway. From your example I
may infer your case to be the typical one in which it *won't* be a
problem...

Here's the explanation, anyway: it is a single statement with a
C<while> statement modifier, so it is just like if it were a single
statement in the corresponding C<while> loop. The statement itself
looks like

  push @{ ... }, $_;

which is a push into an array which happens to be a dereference of
what's inside the braces. Thus the latter must be an array reference,
which in turn happens to be either \@lines1 or \@lines2. In fact these
are values, and are selected by the ternary operator C<?:>. It has the
following form:

  condition ? \@lines1 : \@lines2

The condition is perhaps the most exhotic part of the whole stuff,
since it uses the flip-flop operator:

  1../keyword/

It evaluates to true between the first line and the first /keyword/
match (included), and false thereafter.


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: Sun, 30 Jul 2006 21:13:50 +0200
From: Marek Stepanek <mstep@t-online.de>
Subject: Re: Beginner: read in lines array1 and after keyword array2
Message-Id: <C0F2D18E.29026%mstep@t-online.de>

On 30.07.2006 16:58, in article 81gpc25j6cgnvtnc8crphgib802dg4n4ph@4ax.com,
"Michele Dondi" <bik.mido@tiscalinet.it> wrote:

> On Sun, 30 Jul 2006 16:26:55 +0200, Marek Stepanek <mstep@t-online.de>
> wrote:
> 
> 
> 
> Michele


Thank you Michele, for taking the time to explain this cryptic line.
    push @{ 1../keyword/ ? \@lines1 : \@lines2 }, $_ while <DATA>;
I understood now, how this is working. But I am far of being able, to write
such code alone :-( Great lesson! I have a supplemental question to the
list, which is not on topic under this subject, but perhaps I may dare to do
this as a beginner ...

once again my DATA:

__DATA__

37086,4    15445    808    19,5    3156,3
37667    15769,2    817    19,5    3621
37936,5    15929,6    823    19,5    3857,8
38147,5    16058    827    19,5    4042,8
38371,8    16188,6    833    19,5    4247,4
38607,7    16252,7    837    19,5    4359,2
38752,7    16351,6    844    20,5    4523,9
38774,2    16351,6    844    20,5    4526,9
39056,9    16499,8    849    20,5    4740,6
39249,2    16574,6    853    20,5    4854,6

39720,7    16762,9    864    21,5    5148,7
39932    16847,6    872    22    5289,8
40002,6    16852,9    874    22    5307


keyword


17.07.2006                    CC mU        58.00
17.07.2006                Fr. Knorr    CC mU        60.00
18.07.2006        Unterföhring    MUC    Link    CC mU        45.00
19.07.2006                    CC mU        58.00
20.07.2006        MUC    Hanauer    Hermann/Wacki    CC mU        55.00
21.07.2006                Claudio/Rock    CC oU    55.00
24.07.2006                    CC mU        54.00
24.07.2006                    CC mU        50.00
24.07.2006                    CC mU        55.00
25.07.2006                    CC mU        82.00
26.07.2006    -3.7 Uhr!    Königin    MUC    Wacki    Bar oU
55.00
27.07.2006        hin    rück    Link    CC mU        122.00

for the first part I add with a subroutine the day and dates (with the
module use Date::Calc); each line is a new day, also the empty one. The
first part I read into the @array1 with Michele's genius line :-) The second
part I read into the @array2. I want to add into an new array or into the
array1 the number of the lines, where the dates are the same like in arryay2
AND where the element is containing oU ...

so @array1 (or the new array3) becomes like follows and ->this<- is inserted
from @array2:

Mon, 17.07.2006    37667.00    15769.20    817    19.50    3621.00
Die, 18.07.2006    37936.50    15929.60    823    19.50    3857.80
Mit, 19.07.2006    38147.50    16058.00    827    19.50    4042.80
Don, 20.07.2006    38371.80    16188.60    833    19.50    4247.40
Fre, 21.07.2006    38607.70    16252.70    837    19.50    4359.20 ->55.00<-
Sam, 22.07.2006    38752.70    16351.60    844    20.50    4523.90
Son, 23.07.2006    38774.20    16351.60    844    20.50    4526.90
Mon, 24.07.2006    39056.90    16499.80    849    20.50    4740.60
Die, 25.07.2006    39249.20    16574.60    853    20.50    4854.60
Mit, 26.07.2006    39249.20    16574.60    853    20.50    4854.60 ->55.00<-
Don, 27.07.2006    39720.70    16762.90    864    21.50    5148.70
Fre, 28.07.2006    39932.00    16847.60    872    22.00    5289.80
Sam, 29.07.2006    40002.60    16852.90    874    22.00    5307.00


thank you once again

marek



------------------------------

Date: Mon, 31 Jul 2006 01:39:39 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Beginner: read in lines array1 and after keyword array2
Message-Id: <b300q3-m5c.ln1@osiris.mauzo.dyndns.org>


Quoth Michele Dondi <bik.mido@tiscalinet.it>:
> On 30 Jul 2006 14:07:06 +0200, Michele Dondi <bik.mido@tiscalinet.it>
> wrote:
> 
> >  my (@lines1, @lines2);
> >  while (<DATA>)
> >  {
> >      last if /keyword/;
> >      push @lines1, $_;
> >  }
> >  @lines2=<DATA>;
> >
> >The situation will be slightly more complex if you also want to put
> >the "keyword" line either in @lines1 or @lines2.
> 
> Oh, and one funky (IMHO) solution which will put the keyword line into
> @lines1 (one can pop() it afterwards):
> 
>   push @{ 1../keyword/ ? \@lines1 : \@lines2 }, $_ while <>;

Or, clearer once one understands the uses of .. in scalar context:

    if (1../keyword/) {
        push @lines1, $_;
    }
    else {
        push @lines2, $_;
    }

1../keyword/ should be read as 'we are between line 1 and a line which
matches /keyword/', so this reads as

    if we are between line 1 and a line which matches /keyword/,
        push the current line onto @lines1,
    otherwise
        push the current line onto @lines2.

Michele's code is basically a way of working around the fact that you
can't say

    push( (foo ? @foo : @bar), $_ );

in Perl5 as the ?: operator won't accept arrays.

Ben

-- 
For far more marvellous is the truth than any artists of the past imagined!
Why do the poets of the present not speak of it? What men are poets who can
speak of Jupiter if he were like a man, but if he is an immense spinning
sphere of methane and ammonia must be silent?~Feynmann~benmorrow@tiscali.co.uk


------------------------------

Date: Sun, 30 Jul 2006 22:23:01 +0200
From: Bo Lindbergh <blgl@stacken.kth.se>
Subject: Re: Semantics of threads
Message-Id: <eaj4f5$u8j$1@news.su.se>

In article <6j6jp3-01h.ln1@osiris.mauzo.dyndns.org>,
 Ben Morrow <benmorrow@tiscali.co.uk> wrote:
> and you *are* supposed to be able to call system
> from a threaded Perl program

 ... but only from the main thread.  Try this snippet:
{
    use threads;

    $ENV{FOOGLE}="main thread value";
    async {
        $ENV{FOOGLE}="new thread value";
        system("printenv FOOGLE");       # outputs "main thread value"
    }->join();
}

That is, you can't control the environment of any program you start
from a non-main thread.  There are already the "system PROGRAM LIST"
and "system LIST" variations, so there's no reasonable syntax for
an explicit environment parameter either.


/Bo Lindbergh


------------------------------

Date: Mon, 31 Jul 2006 01:45:10 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Semantics of threads
Message-Id: <md00q3-m5c.ln1@osiris.mauzo.dyndns.org>


Quoth Bo Lindbergh <blgl@stacken.kth.se>:
> In article <6j6jp3-01h.ln1@osiris.mauzo.dyndns.org>,
>  Ben Morrow <benmorrow@tiscali.co.uk> wrote:
> > and you *are* supposed to be able to call system
> > from a threaded Perl program
> 
> ... but only from the main thread.  Try this snippet:
> {
>     use threads;
> 
>     $ENV{FOOGLE}="main thread value";
>     async {
>         $ENV{FOOGLE}="new thread value";
>         system("printenv FOOGLE");       # outputs "main thread value"
>     }->join();
> }
> 
> That is, you can't control the environment of any program you start
> from a non-main thread.  There are already the "system PROGRAM LIST"
> and "system LIST" variations, so there's no reasonable syntax for
> an explicit environment parameter either.

Well, a process only has one environment, so assignments to %ENV in
subthreads aren't going to do what you think. This is not really a
problem with system per se, more with %ENV. I think there would be a
good case for saying %ENV should be process-global, with all the races
that implies: after all, that's how the environment actually works.

Ben

-- 
I touch the fire and it freezes me,               [benmorrow@tiscali.co.uk]
I look into it and it's black.
Why can't I feel? My skin should crack and peel---
I want the fire back...                     Buffy, 'Once More With Feeling'


------------------------------

Date: Sun, 30 Jul 2006 16:46:47 +0100
From: Adam Funk <a24061@yahoo.com>
Subject: Re: Sending data from perl to gnuplot and getting an "ASCII-art" graph back?
Message-Id: <7s0vp3-mim.ln1@news.ducksburg.com>

On 2006-07-29, Theo Hopman <hopman.theo@gmail.com> wrote:

> What you really want to do is pipe these commands to the stdin of
> gnuplot. You also want to use inline data (see `help datafile
> special-filenames`) like such:
>
> plot "-" with impulses
> -5 2
> 2 5
> e
 ...
> gnuplot_output=`echo $gnuplot-commands-and-data | gnuplot`

The Perl equivalent of that works perfectly.  Thanks!


------------------------------

Date: Sun, 30 Jul 2006 13:15:49 GMT
From: "Mumia W." <mumia.w.18.spam+nospam.usenet@earthlink.net>
Subject: Re: What is "or equal" in perl? Thanks
Message-Id: <9i2zg.6484$bP5.2956@newsread1.news.pas.earthlink.net>

On 07/30/2006 01:09 AM, usenet@DavidFilmer.com wrote:
> perlie_newbie wrote:
> 
>>  [a multi-posted question]
> 
> This question was multiposted to PB. Please burn this thread.
> 

Perl-beginner is a totally different forum. It's acceptable to 
post the same message in different forums because there's not 
guarantee that a person who subscribes to one forum is also 
subscribed to the other.

While multi-posting to the same forum (e.g. usenet/usenet) 
might be improper, multi-posting to different forums is simply 
like talking with different groups of people, and it is not 
improper.

And the question has been answered anyway:
http://groups.google.com/groups?selm=UQOyg.179449$771.25101@edtnps89

IOW,

$var ||= 9;
   is the same as saying
$var = $var || 9;


------------------------------

Date: 30 Jul 2006 11:00:17 -0700
From: "perlie_newbie" <ongtiongheng@gmail.com>
Subject: Re: What is "or equal" in perl? Thanks
Message-Id: <1154282417.757618.57760@i3g2000cwc.googlegroups.com>

Thanks folks.

I confused that I have post the same question in perl beginner.
Sorry for the confusing / "anger" that I have caused.


ok. ok. beer on me went you come to Singapore.


Thanks.








Mumia W. wrote:
> On 07/30/2006 01:09 AM, usenet@DavidFilmer.com wrote:
> > perlie_newbie wrote:
> >
> >>  [a multi-posted question]
> >
> > This question was multiposted to PB. Please burn this thread.
> >
>
> Perl-beginner is a totally different forum. It's acceptable to
> post the same message in different forums because there's not
> guarantee that a person who subscribes to one forum is also
> subscribed to the other.
>
> While multi-posting to the same forum (e.g. usenet/usenet)
> might be improper, multi-posting to different forums is simply
> like talking with different groups of people, and it is not
> improper.
>
> And the question has been answered anyway:
> http://groups.google.com/groups?selm=UQOyg.179449$771.25101@edtnps89
>
> IOW,
> 
> $var ||= 9;
>    is the same as saying
> $var = $var || 9;



------------------------------

Date: 30 Jul 2006 11:11:25 -0700
From: "perlie_newbie" <ongtiongheng@gmail.com>
Subject: Re: What is "or equal" in perl? Thanks
Message-Id: <1154283085.914296.229550@75g2000cwc.googlegroups.com>

Oops.

Should be " I confessed..."


perlie_newbie wrote:

> Thanks folks.
>
> I confused that I have post the same question in perl beginner.
> Sorry for the confusing / "anger" that I have caused.
>
>
> ok. ok. beer on me went you come to Singapore.
>
>
> Thanks.
>
>
>
>
>
>
>
>
> Mumia W. wrote:
> > On 07/30/2006 01:09 AM, usenet@DavidFilmer.com wrote:
> > > perlie_newbie wrote:
> > >
> > >>  [a multi-posted question]
> > >
> > > This question was multiposted to PB. Please burn this thread.
> > >
> >
> > Perl-beginner is a totally different forum. It's acceptable to
> > post the same message in different forums because there's not
> > guarantee that a person who subscribes to one forum is also
> > subscribed to the other.
> >
> > While multi-posting to the same forum (e.g. usenet/usenet)
> > might be improper, multi-posting to different forums is simply
> > like talking with different groups of people, and it is not
> > improper.
> >
> > And the question has been answered anyway:
> > http://groups.google.com/groups?selm=UQOyg.179449$771.25101@edtnps89
> >
> > IOW,
> > 
> > $var ||= 9;
> >    is the same as saying
> > $var = $var || 9;



------------------------------

Date: 30 Jul 2006 14:56:49 -0700
From: usenet@DavidFilmer.com
Subject: Re: What is "or equal" in perl? Thanks
Message-Id: <1154296609.320968.13620@i42g2000cwa.googlegroups.com>

Mumia W. wrote:
> Perl-beginner is a totally different forum. It's acceptable to
> post the same message in different forums because there's not
> guarantee that a person who subscribes to one forum is also
> subscribed to the other.

Then crosspost if you feel you must. But never multipost.  That's
always rude.

-- 
David Filmer (http://DavidFilmer.com)



------------------------------

Date: Sun, 30 Jul 2006 22:31:55 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: What is "or equal" in perl? Thanks
Message-Id: <vrazg.176729$S61.24937@edtnps90>

usenet@DavidFilmer.com wrote:
> Mumia W. wrote:
>>Perl-beginner is a totally different forum. It's acceptable to
>>post the same message in different forums because there's not
>>guarantee that a person who subscribes to one forum is also
>>subscribed to the other.
> 
> Then crosspost if you feel you must. But never multipost.  That's
> always rude.

This must be a Google thing because I have been a subscriber to the Perl
Beginners *Mailing* *List* for many years and I have not seen that post on the
list.  Please keep your Google squabbles on Google and not on Usenet.  TIA


John
-- 
use Perl;
program
fulfillment


------------------------------

Date: 30 Jul 2006 15:59:40 -0700
From: "Matt Garrish" <mgarrish@gmail.com>
Subject: Re: What is "or equal" in perl? Thanks
Message-Id: <1154300379.959794.45370@75g2000cwc.googlegroups.com>


usenet@DavidFilmer.com wrote:

> perlie_newbie wrote:
>
> >  [a multi-posted question]
>
> This question was multiposted to PB. Please burn this thread.
>

Although I do enjoy a good bonfire, it would be more helpful to quote
the answer that was given there, or at least crosspost it here so that
it can be discussed in both places. There's nothing worse than a dead
thread that's supposedly answered elsewhere.

Matt



------------------------------

Date: Mon, 31 Jul 2006 02:35:35 GMT
From: "Mumia W." <mumia.w.18.spam+nospam.usenet@earthlink.net>
Subject: Re: What is "or equal" in perl? Thanks
Message-Id: <X%dzg.5949$gF6.3226@newsread2.news.pas.earthlink.net>

On 07/30/2006 04:56 PM, usenet@DavidFilmer.com wrote:
> Mumia W. wrote:
>> Perl-beginner is a totally different forum. It's acceptable to
>> post the same message in different forums because there's not
>> guarantee that a person who subscribes to one forum is also
>> subscribed to the other.
> 
> Then crosspost if you feel you must. But never multipost.  That's
> always rude.
> 

Then Mumia W. was about to say:
 > It is not possible to crosspost to both a usenet
 > newsgroup and a mailing-list.

Now I remember that the situation with 
«beginners-perl[at]perl.org» is complicated. Beginners-perl 
/is/ a mailing-list; however, it's reflected to usenet as 
perl.beginner which is what you were talking about.

I originally thought you were talking about the mailing-list, 
but now I see, using Google, that the OP did multipost to 
perl.beginner as well as clp.misc--which is improper.




------------------------------

Date: 30 Jul 2006 11:29:38 -0700
From: "gavino" <bootiack@yahoo.com>
Subject: why perl over more "powerful" stuff liek lisp haskell smalltalk ruby lua tcl?
Message-Id: <1154284178.152821.256910@m79g2000cwm.googlegroups.com>

I am amazed as I read online how many people say perl a an archaic
tool.
If perl is used right is it
1 not spagetti?
2 debugible?
3 fast?
4 easy to come back to after 6months and know whats going on?



------------------------------

Date: 30 Jul 2006 20:59:26 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: why perl over more "powerful" stuff liek lisp haskell smalltalk ruby lua tcl?
Message-Id: <lrvpc2h7jdbdorfugucg8lhai79ig3qonm@4ax.com>

On 30 Jul 2006 11:29:38 -0700, "gavino" <bootiack@yahoo.com> wrote:

>I am amazed as I read online how many people say perl a an archaic
>tool.

I am amazed at how much crap abounds online. Nontheless this is not a
valid reason to *trust* it all...

>If perl is used right is it
>1 not spagetti?

I don't know what a language to "be spaghetti" could mean. But you can
write spaghetti code in *any* language and Perl certainly does not
encourage that.

>2 debugible?

if "debugible" means "debuggable", then there's no particular reason
why it should not be...

>3 fast?

Depends on how fast is fast for you. As such your question is such a
stupid one that it wouldn't deserve an answer.

>4 easy to come back to after 6months and know whats going on?

That's my own personal experience.

All in all your repeated questions like the present post sound much
like trolling to me. If they're not: trust me, there's nothing we can
say to give you an overall *feeling* about Perl along the lines of
your questions. It may well be a language fit for your needs, taste
and aptitude or completely unfit for any or even all of them. Just try
it and see for yourself. Period!


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: 30 Jul 2006 19:07:11 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: why perl over more "powerful" stuff liek lisp haskell smalltalk ruby lua tcl?
Message-Id: <Xns98108F9FFE9B3castleamber@130.133.1.4>

"gavino" <bootiack@yahoo.com> wrote:

> I am amazed as I read online how many people say perl a an archaic
> tool.
> If perl is used right is it
> 1 not spagetti?
> 2 debugible?
> 3 fast?
> 4 easy to come back to after 6months and know whats going on?

omg!1111oneone, lolz ur so right I for one liek PERL!!!1111

-- 
John Bokma          Freelance software developer
                                &
                    Experienced Perl programmer: http://castleamber.com/


------------------------------

Date: 30 Jul 2006 12:23:12 -0700
From: "gavino" <bootiack@yahoo.com>
Subject: Re: why perl over more "powerful" stuff liek lisp haskell smalltalk ruby lua tcl?
Message-Id: <1154287392.360967.153100@i3g2000cwc.googlegroups.com>


Michele Dondi wrote:
> On 30 Jul 2006 11:29:38 -0700, "gavino" <bootiack@yahoo.com> wrote:
>
> >I am amazed as I read online how many people say perl a an archaic
> >tool.
>
> I am amazed at how much crap abounds online. Nontheless this is not a
> valid reason to *trust* it all...
>
> >If perl is used right is it
> >1 not spagetti?
>
> I don't know what a language to "be spaghetti" could mean. But you can
> write spaghetti code in *any* language and Perl certainly does not
> encourage that.
>
> >2 debugible?
>
> if "debugible" means "debuggable", then there's no particular reason
> why it should not be...
>
> >3 fast?
>
> Depends on how fast is fast for you. As such your question is such a
> stupid one that it wouldn't deserve an answer.
>
> >4 easy to come back to after 6months and know whats going on?
>
> That's my own personal experience.
>
> All in all your repeated questions like the present post sound much
> like trolling to me. If they're not: trust me, there's nothing we can
> say to give you an overall *feeling* about Perl along the lines of
> your questions. It may well be a language fit for your needs, taste
> and aptitude or completely unfit for any or even all of them. Just try
> it and see for yourself. Period!
>
> 
> Michele


woa ok, yikes, Thanks again the the line adder script.



------------------------------

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 V10 Issue 9539
***************************************


home help back first fref pref prev next nref lref last post