Help for this page

Select Code to Download


  1. or download this
    sub middle ($$) {
  my ( $a, $b ) = ( shift, shift );
  return ($a + $b) / 2
}
  2. or download this
    my ($n,$m)=@_;
  3. or download this
    print "SQRT 16:\n",  &sqrt( 16 ), $/, $/;