#!/usr/local/bin/perl
$inputline = <STDIN>;
print ($inputline, $inputline);
