Select Code to Download

#!/usr/bin/perl -w
use strict;
...
package main;
my $w = new Noun("ai(=m-", "blood", "n", "a", "atos");
print $w->{english};