Select Code to Download

for my $i ( @list ) {
    print $i; # Now I want to know what number item I'm at
}