#!/usr/bin/perl -w
use strict;

my $input='';
my @raw=();

while(defined ($input=<>)){
chomp($input);
@raw=$input;
}
print "@raw\n";