Drawing Mustaches on Perl, for fun and profit