for my $i (0..@ARGV){
print...
}