my @addrs = sub { splice(@_, 4) }->( gethostbyname('www.yahoo.com') );