Select Code to Download

use warnings;
use strict;
...
}
my $b = B->new;
$b->_what("foo","bar");  # prints "foobar"