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
[download]

Hope this helps,
-- Hauke D