#!/usr/bin/perl -i -p

tr/\015//d;