for my $i (0 .. $#sites)
{
    # code as before ... 
}