Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
    last if ($count == 6);
  } # end-foreach
} # end-sub

Select or download this

[rsiedl@solitare aim6]$ perl test.pl
Start our tests!
...
        KOL ID:: 7              KOL RANK:: 26
        KOL ID:: 26             KOL RANK:: 13
        KOL ID:: 2              KOL RANK:: 47