foreach $item(@ARGV){
print $item,"\n";
}