$c = <STDIN>;
chomp $c;
$n = <STDIN>;
chomp $n;
$f = <STDIN>;
chomp $f;
$d = <STDIN>;
chomp $d;
print "$c $n $f $d\n";

样例过了，也不知道是不是\r的原因