change \r\n to \n if they occur

git-svn-id: svn://nox.esilibrary.com/migration-tools@617 eee7cc8d-164e-4af6-8e1b-092a69004917

diff --git a/unicorn/unicorn_patrons_to_tsv.pl b/unicorn/unicorn_patrons_to_tsv.pl
index 7c3ca59..18c5a9e 100755 (executable)
--- a/unicorn/unicorn_patrons_to_tsv.pl
+++ b/unicorn/unicorn_patrons_to_tsv.pl
@@ -13,7 +13,7 @@ my %unique_fields;
 
 # Load each record
 while (<>) {
-
+    s/\r\n/\n/g;
 # print STDERR "Loaded this line: " . $_;
 
        # Is this the start of a new record?