my @addrs = sub { @_[4..$#_] }->( gethostbyname('www.yahoo.com') );