alias chomp="perl -pi -e 'tr/\r//d'"