Lines Matching refs:_
28 my @oid_nums = @_;
34 my $C_bytes_size = 2 + scalar @_;
35 my $C_bytes = join(', ', map { sprintf("0x%02X", $_) } @oid_nums );
47 my @oid_nums = @_;
66 my %opts = %{ pop @_ } if ref $_[$#_] eq 'HASH';
71 foreach my $file (@_) {
78 $_;
101 my %opts = %{ $_[$#_] } if ref $_[$#_] eq 'HASH';
102 my @OID_names = _process @_;
105 my %leaves = map { $_ => 1 } registered_oid_leaves;
106 foreach (grep { defined $leaves{$_->[0]} } @OID_names) {
107 my $lines = $opts{filter}->($_, encode_oid($_->[0]));
