Lines Matching refs:p

48 my $p = $len - length($magic_number);
49 my $raw_magic = substr($buf, $p);
55 $p -= 12;
56 my $raw_info = substr($buf, $p, 12);
75     unless ($p >= $name_len + $kid_len + $sig_len);
77 $p -= $sig_len;
78 my $raw_sig = substr($buf, $p, $sig_len);
79 $p -= $kid_len;
80 my $raw_kid = substr($buf, $p, $kid_len);
81 $p -= $name_len;
82 my $raw_name = substr($buf, $p, $name_len);
84 my $module_len = $p;