Select Code to Download

use Type::FromData;
my $dt= Type::FromData->new();
...
#     greeting varchar(5),
#     value decimal(5,2)
# )

package Type::FromData;
use strict;
...
}

1;