while(<>) { s/[\r\n]//g; printf("%d,%s\n", $., $_ ); } exit;