Select Code to Download

package Attr;

...
my $obj = Attr->new;
$obj->set_blah('I just set something!');
print $obj->get_blah;