my @list_of_stuff = get_my_list();
foreach my $i (0 .. $#list_of_stuff)
{
    foreach my $j (0 .. $#list_of_stuff)
    {
        next if $i == $j;

        do_compare($list_of_stuff[$i], $list_of_stuff[$j]);
    }
}