KeyMangler example app

[scpubgit/DKit.git] / bin / km

diff --git a/bin/km b/bin/km
new file mode 100644 (file)
index 0000000..b2cd39b
--- /dev/null
+++ b/bin/km
@@ -0,0 +1,7 @@
+#!/usr/bin/env perl
+
+use App::KeyMangler;
+
+my $tcl = App::KeyMangler->new;
+
+$tcl->run(@ARGV);