package MyClass;
use strict;
use warnings;

use Class::Std;

my $hash_ref = {};
bless $hash_ref, 'MyClass';

sub DEMOLISHx {
    print "demolishing...\n";
}
1;