From c9af50db0c281b789646813c3f77f873d3bd32f7 Mon Sep 17 00:00:00 2001
From: "Janet B. Anderson" <jba@aps.anl.gov>
Date: Wed, 17 Dec 2003 17:05:55 +0000
Subject: [PATCH] Initial version. Used to mofdify created header files to
 avoid solaris compiler warning messages when headers created from WIN32
 build.

---
 configure/tools/dos2unix.pl | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100644 configure/tools/dos2unix.pl

diff --git a/configure/tools/dos2unix.pl b/configure/tools/dos2unix.pl
new file mode 100644
index 000000000..c1001930e
--- /dev/null
+++ b/configure/tools/dos2unix.pl
@@ -0,0 +1,31 @@
+eval 'exec perl -S $0 ${1+"$@"}'  # -*- Mode: perl -*-
+    if $running_under_some_shell; # makeConfigAppInclude.pl
+#*************************************************************************
+# Copyright (c) 2002 The University of Chicago, as Operator of Argonne
+#     National Laboratory.
+# Copyright (c) 2002 The Regents of the University of California, as
+#     Operator of Los Alamos National Laboratory.
+# EPICS BASE Versions 3.13.7
+# and higher are distributed subject to a Software License Agreement found
+# in file LICENSE that is included with this distribution. 
+#*************************************************************************
+
+# Converts text file in DOS CR/LF format to unix ISO format
+#  $Id$
+
+@files=@ARGV;
+
+$| = 1;
+foreach( @files ) {
+    open(INPUT, "<$_");
+    $backup = "$_.bak";
+    rename( $_, $backup) || die "Unable to rename $_\n$!\n";
+    open(OUTPUT, ">$_");
+    while(<INPUT>) {
+    s/\r\n/\n/;
+    print OUTPUT;
+    }
+    close INPUT;
+    close OUTPUT;
+    unlink ($backup) or die "Cannot remove $backup";
+}