1 files changed, 3 insertions, 0 deletions
diff --git a/nocompile/bin/nc.pl b/nocompile/bin/nc.pl
new file mode 100755
index 0000000..ff52ab7
--- /dev/null
+++ b/nocompile/bin/nc.pl
@@ -0,0 +1,3 @@
+#!/usr/pkg/bin/perl
+use IO::Socket;
+$s=IO::Socket::INET->new(PeerAddr=>"$ARGV[0]:$ARGV[1]",Proto=>"tcp",Timeout=>1);if(fork()){while($l=<stdin>){print $s $l;}}else{while($l=<$s>){print $l;}}