And another way, if you needed to do this in a loop, would be:

my $i = 0; 
@addrs = grep { $i++ > 3 } gethostbyname('www.yahoo.com');
[download]