Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

The making of (was: I can see the forestů)

by Aristotle (Chancellor)
on Oct 09, 2004 at 19:01 UTC ( #397892=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    @j = "Just", @a = "another", @p = "Perl", @h = "hacker"; s//@j,/, prin
    +t
    
  2. or download this
    @j = ( "Just", @a = "another", @p = "Perl", @h = "hacker" ); s//@j,/, 
    +print
    
  3. or download this
    @j = (( "Just"    )),
    @a = (( "another" )),
    @p = (( "Perl",   )),
    @h = (( "hacker"  )),
    
  4. or download this
    @j = ( '"Just"', @a = 'another', @p = 'Perl', @h = 'hacker',
    
  5. or download this
    @j = (( qw)"Just"   )),
    @a = (( qw"another" )),
    @p = (( qw"Perl"    )),
    @h = (( qw"hacker"  )),
    
  6. or download this
    @j = ((qw)" Just   " )),
    @a = ((qw " another" )),
    @p = ((qw " Perl   " )),
    @h = ((qw " hacker " )),
    
  7. or download this
    @j = ( '"', 'Just, '"', @a = 'another', @p = 'Perl', @h = 'hacker',
    
  8. or download this
    $ perl -MO=Deparse japh.pl
    @j = (('"', 'Just', '"'), @a = 'another', @p = 'Perl', @h = 'hacker', 
    +()), (s//@j,/, s/" //g), print($_);
    - syntax OK
    
  9. or download this
    @j = ((qw)" Just   " )), @a = ((qw " another" )),
    @p = ((qw " Perl   " )), @h = ((qw " hacker " )),
    (()),),(s""@j,",s (" )))g), print
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://397892]
help
Chatterbox?
[1nickt]: So if I was to offer any editorial advice it would be to (1) make it endure time passing (2) make it positive (3) make it about you and your beliefs
[1nickt]: (Disicpulus The new best choice is maybe "First People"
[karlgoethebier]: Discipulus: This is called "Volksverhetzung" in German which means
[karlgoethebier]: incitement of the people and it is prohibited by law
[1nickt]: The best sign I have sign in a protest march was carried by a kid of about 10 years "If you build a wall my generation will tear it down."
[1nickt]: ... sign I have seen ...
[1nickt]: Now that one made me hopeful! First time not angry in a long time when I saw that kid.
[Discipulus]: i propend for removing: why? because we are so few that we must find i minimal common divisor, this is certainly Perl not our (anyway private) thougths. And i say this still wondering because i love a lot freedom of expression. And i say this not for roho
[1nickt]: Discipulus that was the point of my story of taking the sticker off my truck. I know there are lots of people in the world who if I knw their private beliefs I might want to argue with them. And they with me. But life cannot all be arguments!
[1nickt]: This is less than perfect ... but demanding perfection (from people or from life) is a sure way to unhappiness.

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (9)
As of 2017-06-22 12:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    How many monitors do you use while coding?















    Results (519 votes). Check out past polls.