Lines Matching refs:_
30 my @oid_nums = @_;
36 my $C_bytes_size = 2 + scalar @_;
37 my $C_bytes = join(', ', map { sprintf("0x%02X", $_) } @oid_nums );
49 my @oid_nums = @_;
68 my %opts = %{ pop @_ } if ref $_[$#_] eq 'HASH';
73 foreach my $file (@_) {
80 $_;
103 my %opts = %{ $_[$#_] } if ref $_[$#_] eq 'HASH';
104 my @OID_names = _process @_;
107 my %leaves = map { $_ => 1 } registered_oid_leaves;
108 foreach (grep { defined $leaves{$_->[0]} } @OID_names) {
109 my $lines = $opts{filter}->($_, encode_oid($_->[0]));