Help for this page

Select Code to Download


  1. or download this
    john@john-laptop:~/Projects/Cloud-T3n$ time perl refs.pl
1000000/1000000
real    0m53.021s
user    0m10.753s
sys    0m1.912s
  2. or download this
    john@john-laptop:~/Projects/Cloud-T3n$ time /usr/bin/perl refs.pl
1000000/1000000
real    0m58.048s
user    0m11.989s
sys    0m1.672s
  3. or download this
    
package Top;
...
  find_cycle( $top );
  find_cycle( $bottom );
}