Lines Matching refs:option
303 $option = shift @argv;
304 if ($option =~ /^-debug$/i)
309 elsif ($option =~ /^-usage$/i)
314 elsif ($option =~ /^-(h|help)$/i)
319 elsif ($option =~ /^-profile$/i)
323 elsif ($option =~ /^-verbose$/i)
327 elsif ($option =~ /^-detail$/i)
332 elsif ($option =~ /^-keep$/i)
336 elsif (&valid_option($option))
340 elsif ($option =~ /^-/)
342 print "Invalid option: $option\n";
348 $option =~ s/\.pl$//;
349 push(@TESTS,$option);