len

[Robin]

what would this do?

sub array_abslen

{

my (@array) = @_;

my ($len);

$len = @array;

$len = $len - 1;

return ($len);

}

thanks,

-Robin

 

[Gunnar Hjalmarsson]

what would this do?

sub array_abslen
{
my (@array) = @_;
my ($len);
$len = @array;
$len = $len - 1;
return ($len);
}

The same as

sub array_abslen { @_ - 1 }

 

[Ragnar Hafstað]

what would this do?

sub array_abslen

defines function

{

my (@array) = @_;

the function takes an array (or list) as argument

my ($len);

$len = @array;

this is the number of elements in the array (list)

$len = $len - 1;

substract one

return ($len);

return that

}

in other words this is a rather long-winded way to calculate one less
than the numbers of elements in an array/list

I could mention $#x, but i will not bother.

thanks,

you are welcome

-Robin

gnari

 

[Matt Garrish]

what would this do?

sub array_abslen

{

my (@array) = @_;

my ($len);

$len = @array;

$len = $len - 1;

return ($len);

}

thanks,

It's a rather long and pointless way of checking $#array. Arrays start at 0,
so if you want the last element in the array you get the length (total
number of entries) and subtract one.

Matt

 

[Tad McClellan]

The same as

sub array_abslen { @_ - 1 }

and also the same as:

sub array_abslen { $#_ }


(as long as you haven't done anything that you shouldn't have.)