Lines Matching refs:first
17 local(@args,$_,$first,$rest);
22 ($first,$rest) = ($1,$2);
23 $pos = index($argumentative,$first);
32 push(\@opt_$first, \$rest);
33 if (!defined \$opt_$first or \$opt_$first eq '') {
34 \$opt_$first = \$rest;
37 \$opt_$first .= ' ' . \$rest;
42 eval "\$opt_$first = 1";
52 print STDERR "Unknown option: $first\n";