array slice question

[kr]

Hi there,

Is it possible to slice an array from a particular element to the end
of it without using $#<array name>? My goal is the get only the IP
addresses from the output of gethostbyname().

Thanks

[Jim Gibson]

In article <e0**************************@posting.google.com >, kr
<ir******@yahoo.com> wrote:

Hi there,

Is it possible to slice an array from a particular element to the end
of it without using $#<array name>? My goal is the get only the IP
addresses from the output of gethostbyname().

Negative indices count backwards from the end of the array, so element
-1 is the last element in an array. Therefore, you can use
@array[4..-1] to get an array slice from element 4 to the end.

FYI: This newsgroup is defunct; try comp.lang.perl.misc in the future.

[Gunnar Hjalmarsson]

Jim Gibson wrote:

In article <e0**************************@posting.google.com >, kr
<ir******@yahoo.com> wrote:

Is it possible to slice an array from a particular element to the
end of it without using $#<array name>? My goal is the get only
the IP addresses from the output of gethostbyname().

Negative indices count backwards from the end of the array, so
element -1 is the last element in an array. Therefore, you can use
@array[4..-1] to get an array slice from element 4 to the end.

No, he can't. The range operator does not permit that the left value
is greater than the right value.

The splice() function is an option, though:

my @ret = gethostbyname 'example.com';
my @ip = map { join '.', unpack 'C4', $_ } splice @ret, 4;

--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl

[kr]

Gunnar Hjalmarsson <no*****@gunnar.cc> wrote in message news:<iR*********************@newsc.telia.net>...
...

No, he can't. The range operator does not permit that the left value
is greater than the right value.

The splice() function is an option, though:

my @ret = gethostbyname 'example.com';
my @ip = map { join '.', unpack 'C4', $_ } splice @ret, 4;

That's my problem exactly.. originally I thought to simply use
[4..-1], but that produced no results (no warning either though)..

Actually, if I'm to use a temp variable for this, I won't need
splice(), e.g.

@a = gethostbyname("www.microsoft.com");
print join "\n", map { join ".", unpack "C4", $_ } @a[4..$#a];

Anyway, thanks to all those who took time to look at my issue..