Hi Chaoui05,
Well, to randomize it, you can shuffle both the list of browsers and the list of combinations, that'll ensure that you always have all comparisons but in a random order:
use List::Util 'shuffle';
use Algorithm::Combinatorics 'combinations';
my @browsers = shuffle('firefox', 'chrome', 'internet explorer');
for my $c (shuffle combinations(\@browsers,2)) {
print "Compare $$c[0] with $$c[1]\n";
}
__END__
Compare internet explorer with firefox
Compare firefox with chrome
Compare internet explorer with chrome
Hope this helps,
-- Hauke D