#!/usr/bin/perl

print $_, $/ for @ARGV;