#!/usr/bin/perl -w

foreach (@ARGV){
   print;
}