#!/usr/bin/env perl use App::KeyMangler; my $tcl = App::KeyMangler->new; $tcl->run(@ARGV);