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

use App::PigLatin qw(translate);

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

print translate(\$text);
