sub addNums {
    # 0 self
    # 1 attr
    # 2 value
    $_[0]->{$_[1]} = $_[2];
}