Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

package Message;
...

my $name2 = Message->name($message_obj);
print "\nMy name is $name2\n";
  2. or download this
    #!/usr/bin/perl -w

package Message;
...

my $name2 = Message->name($message_obj);
print "\nMy name is $name2\n";