Re: @addrs = (gethostbyname('www.yahoo.com'))[4..-1] ?

#!/usr/bin/perl --

use strict;
use warnings;

use Net::hostent;
use Socket;

my @addrs = @{ gethostbyname('www.yahoo.com')->addr_list };
[download]

Comment on Re: @addrs = (gethostbyname('www.yahoo.com'))[4..-1] ? Download Code

Replies are listed 'Best First'.
Re^2: @addrs = (gethostbyname('www.yahoo.com'))[4..-1] ? by ikegami (Patriarch) on Nov 04, 2010 at 02:38 UTC
That still uses an intermediate variable (not that I think it makes sense to request avoiding such).	[reply]
Re^3: @addrs = (gethostbyname('www.yahoo.com'))[4..-1] ? by Anonymous Monk on Nov 04, 2010 at 02:53 UTC
I don't understand how. I guess I have no idea what is an "intermediate variable"	[reply]
Re^4: @addrs = (gethostbyname('www.yahoo.com'))[4..-1] ? by ikegami (Patriarch) on Nov 04, 2010 at 03:02 UTC
The new `gethostbyname` copies the values from `gethostbyname` into an array. `addr_list` returns that array variable. It's what's being dereferenced (@{}). (Only one of the 4 solutions I posted copy the returned values.)	[reply] [d/l] [select]