#!/usr/bin/perl

undef $/;

open (IN, "input");
open (OUT, ">output");

$_ = <IN>;
s/\n//g;
print OUT $_;