Lines Matching refs:l
650 my @l = ();
653 push(@l, $self->{_be}->[$list]);
655 @l = @{$self->{_be}};
661 push(@l, $self->{_be}->[$i]);
664 return \@l;
675 my $l = $self->_be_list($list);
678 for my $be (@$l) {
691 my $l = $self->_be_list($list);
692 for my $be (@$l) {
704 my $l = $self->_be_list($list);
705 for my $be (@$l) {
718 my $l = $self->_be_list($list);
719 for my $be (@$l) {