$index++ until $repo[$index] eq $input or $index > $#repo;