my $message_obj = Message->new( $name, $subject, $message );

##</code><code>##

my $name2 = Message->name( $message_obj );

##</code><code>##

my $name2 = $message_obj->name();