sub ref_push{push@{$_[0]||=[]},@_[1..$#_]}