Beefy Boxes and Bandwidth Generously Provided by pair Networks DiBona
Keep It Simple, Stupid
 
PerlMonks  

Genetic Programming or breeding Perls

by gumpu (Friar)
on Sep 05, 2000 at 21:06 UTC ( #31147=CUFP: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
        my $x=1;
        my $y=1;
    
  2. or download this
      $x += 1; $x  =$y; $x |=$y;  $x +=$y; $y  =$x;
    
  3. or download this
     
      my $x=1; my $y=1; $x+=1; $y=$x; $x+=$y; $x+=1; $y=$x; $x+=$y; 
    
  4. or download this
    my $x=1;my $y=1; $x+=1; $x+=1;$x+=$y ;$y=$x ;$x+=$y ;$x+=$y ;$y=$x ;$x
    +=$y ;
      $x+=$y ;$x+=$y ;$x+=$y ;$x+=1;$x+=$y ;$x+=$y ;$y=$x ;$x+=$y ;$x+=$y 
    +;
      $x+=$y ;$y=$x ;$x+=$y ;$x+=$y ;$x+=$y ;$y=$x ;$x+=$y ;$x|=$y ;$y=$x 
    +;
      $x+=$y ;$x+=$y ;
    
  5. or download this
    #!/usr/bin/perl -w
    
    ...
    }
    
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (7)
As of 2014-04-21 10:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (492 votes), past polls