Help for this page

Select Code to Download


  1. or download this
    #! /usr/bin/perl
use Test::LectroTest;
...
  eq_deeply( square( $x ), [ $sq, $sq ] );
}, name => "Finding \$x's square. Twice!";
  2. or download this
    c:/dev/fun $ perl lec.pl 
1..1
ok 1 - 'Finding $x's square. Twice!' (1000 attempts)
  3. or download this
    c:/dev/fun $ perl lec.pl 
1..1
...
.
.
# Followed by 997 more ok's