#!/usr/bin/perl

while (<STDIN>)
{
	s/\r/\n/gi;
	print $_;
}
