#!/usr/bin/perl 

foreach  (<>){
    chomp;
    print "$_";
}