Lines Matching refs:val
61 my $val = "";
642 $val = shift @ARGV;
643 if (!defined($val)) {
646 $build = $val;
650 $val = shift @ARGV;
651 if (!defined($val)) {
654 $tree = $val;
688 $val = $ARGV[2];
689 if ($val ne "good" && $val ne "bad") {
690 die "Unknown command '$val', bust be either \"good\" or \"bad\"\n";
743 if ($val eq "good") {
745 } elsif ($val eq "bad") {