use strict;
use warnings;

for my $index (0 .. $#ARGV) {
    print $ARGV[$index] . "\n";
}