sub B::FAKEOP::fake_ppaddr { $_[0]->{fake_ppaddr} || 0 } sub B::FAKEOP::fake_ppaddr { $_[0]->{fake_ppaddr} || $_->{ppaddr} || 0 }