@colors=("blue","green"); for my $row(0..$#rows) { print "", $rows[$row],""; }