Select Code to Download

subroutine(\@list)

$count=$#(@$listref);

"Bizarre copy of ARRAY in leave at..."

my @local_array=@$list;
my $count=$#local_array;