The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Petal::TranslationService::Noop;
use warnings;
use strict;

sub new
{
    my $class = shift;
    return bless {}, $class;
}

sub maketext
{
    my $self = shift;
    return join '', @_;
}

1;


__END__