Help for this page
return @{$_[0]} if $idx == -1;
sub purge_this_one { ... splice( @$aref, $idx, 1 ); return @$aref; }