Lines Matching refs:v
37 @v = split(' ',$c[$i]);
38 $s .= "0x$v[0], \t";
39 if ($#v > 0) {
40 print "$i $v[0] $v[1]\n";
54 @v = split(/;/,$_);
55 if ($v[1] =~ /[\dA-F]+/) {
56 $code = &sjis2code($v[1]);
57 $docomo{$code} = $v[0];
58 $to_docomo{$v[0]} = $code;
60 if ($v[2] =~ /[\dA-F]+/) {
61 $code = &sjis2code($v[2]);
62 $kddi{$code} = $v[0];
63 $to_kddi{$v[0]} = $code;
65 if ($v[3] =~ /[\dA-F]+/) {
66 $code = &sjis2code($v[3]);
67 $softbank{$code} = $v[0];
68 $to_sb{$v[0]} = $code;
83 $v = $key - $docomo_min;
112 $v = $to_docomo{$key} - $to_docomo_min;
191 $v = $key - $kddi_min1;
219 $v = $to_kddi{$key} - $to_kddi_min;
311 $v = $key - $sb_min1;
342 $v = $to_sb{$key} - $to_sb_min;