No one would ever see any of my code having this kind of indent, so I can't see what you're talking about if you can't at least stay on topic. Open '{' on the end, close '}' on the beginning.
Unless and wantarray when done well are good.
Moose at CPAN looks promising and shows how to be more fun than one should have. The difference between hash enumerated, set to true, reverse hash (careful keys), etc.
is to be considered, I think.
Names are variables and variables names.
if($i == $$ar_l
$i && $hr_h->{$i} == $this)
# not my indent type :-)
{
....
push(@these, $ar_l->
$i);
}
}