I can't figure out why that code even compiles. Assigning to chomp should result in the following error: Can't modify scalar safe chop in scalar assignment... But, this error doesn't occur when assigning to chomp if the argument to chomp is an assignment from a filehandle read. Some sort of obscure parsing bug...

Here's what your code should look like:

#!/usr/bin/perl -w

use strict;
use Text::Bastardize;

chomp(my $line = <>);
my $latin = Text::Bastardize->new();
$latin->charge($line);
print $latin->pig(),"\n";
[download]