#!/usr/bin/perl -w
use strict;
use Text::Bastardize;
my $latin = Text::Bastardize->new();
$latin->charge('blah 10 ');
print $latin->pig(),"\n"