From 9135ec02b8eff4cf4c0d6dbcb54346b3f508a6f1 Mon Sep 17 00:00:00 2001
From: epochqwert <epoch@hacking.allowed.org>
Date: Wed, 19 Aug 2015 20:47:05 -0500
Subject: save point.

---
 chat/chat.sh | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100755 chat/chat.sh

(limited to 'chat/chat.sh')

diff --git a/chat/chat.sh b/chat/chat.sh
new file mode 100755
index 0000000..f203228
--- /dev/null
+++ b/chat/chat.sh
@@ -0,0 +1,15 @@
+#!/usr/pkg/bin/perl
+chdir("/home/segfault/chat");
+my $sentence="";
+my $i=0;
+@words=split(/ /,join(" ",@ARGV));
+foreach(@words) {
+ if(!chdir($_)) {
+  $args=join(" ",@words[$i .. $#words]);
+  $args =~ s/'/'\\''/g;
+  system("./_ '" . $args . "'\n");
+  exit;
+ }
+ $i++;
+}
+system("./_");
-- 
cgit v1.2.3