Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: How long have you been using Perl?

by stefp (Vicar)
on May 18, 2004 at 12:31 UTC ( #354239=note: print w/ replies, xml ) Need Help??


in reply to How long have you been using Perl?

I use perl since at least 1989 if I judge by some of my advocacy postings. But I can't find perl code written by me before 1991 when I did post to soc.culture.french a script that listed all the words including all the vowels from a French dictionnary. It deals with diacritic characters:

perl -e 'while(<>) {
   if(m/y/&&m/u/&&m/o/&&m/i/&&m/a/&&m/e/){ s/'\''`//;push(@a,$_);}
}
print sort{length($a)<=>length($b)||$a cmp $b;}@a'
 
It was posted as a one liner but I broke it in many lines because I hate code that obliges you to horizontally scroll a page. Today, I would use modifiers and drop parenthesis here and there but would not write it very differently.

-- stefp


Comment on Re: How long have you been using Perl?

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://354239]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (5)
As of 2015-07-07 04:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (87 votes), past polls