From 0ef7df63e725b0871d7496437af90327b493dddf Mon Sep 17 00:00:00 2001
From: Ryan Voots <simcop2387@simcop2387.info>
Date: Sun, 1 Aug 2010 12:44:31 -0400
Subject: [PATCH] adding zippit plugin from ik's sources

---
 plugins/zippit.pm | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 plugins/zippit.pm

diff --git a/plugins/zippit.pm b/plugins/zippit.pm
new file mode 100644
index 0000000..0f1bbd0
--- /dev/null
+++ b/plugins/zippit.pm
@@ -0,0 +1,18 @@
+use LWP::UserAgent;
+use URI::Escape qw/uri_escape/;
+
+no warnings 'void';
+sub {
+	my( $said ) = @_;
+
+    my $ua = LWP::UserAgent->new();
+    my $foo = $ua->get('http://xn--55d.com/cgi/yep2.pl?txt='.uri_escape($said->{body}));
+    if ($foo->is_success) {
+        print $foo->content;
+    } else {
+        print $foo->status_line;
+    }
+}
+
+__DATA__
+head http://url/; returns the response code and server type from a HEAD request for a particular url.