view release on metacpan or  search on metacpan

bin/piglatin  view on Meta::CPAN

#!/usr/bin/env perl
use strict;
use warnings;

use App::PigLatin qw(translate);

$/="";
my $text = <>;

print translate(\$text);