Lines Matching refs:triplet
191 local($input, $file, $triplet) = @_;
265 @$triplet = @triparray;
1264 local(@triplet, $cstr);
1271 while (@{$words = uucpline(OPTIONS, $options, \@triplet)}) {
1272 $cstr .= $triplet[0];
1277 $cstr .= $triplet[1];
1282 $cstr .= $triplet[2];
1284 $cstr .= $triplet[0] . $triplet[2];
1346 local ($file, $cstr, @triplet, $newsecret);
1352 while (@{$words = uucpline(SECRETS, $pppdir . $fname, \@triplet)}) {
1353 $cstr .= $triplet[0];
1360 $cstr .= $triplet[1];
1362 $cstr .= $triplet[2];
1365 $cstr .= $triplet[0] . $triplet[2];