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

##</code><code>##

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

##</code><code>##

my @addrs = splice(@{[ gethostbyname('www.yahoo.com') ]}, 4);

##</code><code>##

my @addrs = gethostbyname('www.yahoo.com'); splice(@addrs, 0, 4);