print -> say for newline goodness

diff --git a/split-route.pl b/split-route.pl
index 43de160da47c72b6e80d76c80999509f29989d69..f4c3cba0fe5e0a070a0d9075cdad10f5e6302fd3 100755 (executable)
--- a/split-route.pl
+++ b/split-route.pl
@@ -281,6 +281,6 @@ sub get_substops {
 # Simple debugging function
 sub debug {
     if( $debug ){
-        print join( "\n", @_ );
+        say join( "\n", @_ );
     }
 }