#!/usr/local/bin/perl
# crlf - make sure each line ends with CRLF, not just LF or CR.
# --------------------------------------------------------------------
while (<>) {
    chomp;
    printf ("$_\r\n");
}