Help for this page

Select Code to Download

Select or download this

my ($object) = new Object;

$object->whatever(0);
print "Whatever is '",$object->whatever(),"'\n";     # Oops!