The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Acme::MetaSyntactic;
my $b = Acme::MetaSyntactic->new( 'test_ams_list' );
print $b->name;