Lines Matching defs:mac
47 $self->{"mac"} = substr($$data, $offset, $self->{'mac_size'});
72 $self->{"mac"} = "";
100 return length(defined($self->{"mac"}) ? $self->{"mac"} : "");
103 sub mac {
105 my $mac = unpack("H*", $self->{"mac"}) if defined($self->{"mac"});
106 return $mac;
182 $self->{"mac"} = &{$self->{"sign_func"}}($self->{"key"}, $sigdata);
183 $self->{"mac_size"} = length($self->{"mac"});
191 $rdata .= $self->{"mac"};
257 =head2 mac
259 print "MAC = ", $rr->mac, "\n";