#!/usr/bin/perl -p
BEGIN {binmode STDOUT}

##</code><code>##

#!/usr/bin/perl -p
tr/\r//d;