Made unix-socket-script compatible to old versions of IO::Socket::UNIX.

csabahenk · Sep 29, 2008 · 89da837 · 89da837
1 parent 2d15ad7
commit 89da837
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/scripts/unix.pl b/scripts/unix.pl
@@ -39,7 +39,7 @@
 
 die "Failed to create socket. $!.\n" unless $socket;
 
-$socket->say("@ARGV\n") or die("Failed to send command. $!.\n");
+$socket->print("@ARGV\n") or die("Failed to send command. $!.\n");
 
 my $reply = $socket->getline;