--- ./plugins/node.d/ntp_.in.orig	2014-03-26 18:45:21.374305323 -0500
+++ ./plugins/node.d/ntp_.in	2015-03-06 22:31:31.154285245 -0600
@@ -77,7 +77,7 @@
                 if ($line =~ m/^\s*\d+/) {
                         my (undef, undef, $assid, undef, undef, undef, undef, undef, undef, undef) = split(/\s+/, $line);
                         chomp(my $peerinfo = `ntpq -n -c "readvar $assid srcadr"`);
-                        $peerinfo =~ s/\R/ /g;
+                        $peerinfo =~ s/\n/ /g;
                         my ($peer_addr) = ($peerinfo =~ m/srcadr=(.*)/);
                         print $peer_addr, "\n" unless $peer_addr eq "0.0.0.0";
                 }
@@ -114,7 +114,7 @@
         if ($line =~ m/^\s*\d+/) {
                 my (undef, undef, $assid, undef, undef, undef, undef, undef, undef, undef) = split(/\s+/, $line);
                 chomp(my $peerinfo = `ntpq -n -c "readvar $assid srcadr,delay,offset,jitter"`);
-                $peerinfo =~ s/\R/ /g;
+                $peerinfo =~ s/\n/ /g;
                 ($srcadr) = ($peerinfo =~ m/srcadr=([^, ]+)/);
                 ($delay) = ($peerinfo =~ m/delay=([^, ]+)/);
                 ($offset) = ($peerinfo =~ m/offset=([^, ]+)/);
@@ -152,7 +152,7 @@
                 if ($line =~ m/^\s*\d+/) {
                         my (undef, undef, $assid, undef, undef, undef, undef, undef, undef, undef) = split(/\s+/, $line);
                         chomp(my $peerinfo = `ntpq -n -c "readvar $assid srcadr,delay,offset,jitter"`);
-                        $peerinfo =~ s/\R/ /g;
+                        $peerinfo =~ s/\n/ /g;
                         ($srcadr) = ($peerinfo =~ m/srcadr=([^, ]+)/);
                         ($delay) = ($peerinfo =~ m/delay=([^, ]+)/);
                         ($offset) = ($peerinfo =~ m/offset=([^, ]+)/);