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

...
}