Lines Matching refs:exitval
34 -exitval => $exit_status ,
39 -exitval => $exit_status ,
80 =item C<-exitval>
249 pod2usage(-exitval => 2);
251 pod2usage({-exitval => 2, -output => \*STDERR});
255 pod2usage(-exitval => 2, -verbose => 0);
257 pod2usage(-exitval => 2, -verbose => 0, -output => \*STDERR);
268 pod2usage(-msg => "Syntax error.", -exitval => 2);
270 pod2usage({-msg => "Syntax error.", -exitval => 2, -output => \*STDERR});
274 pod2usage(-msg => "Syntax error.", -exitval => 2, -verbose => 0);
277 -exitval => 2,
289 pod2usage(-exitval => 1);
291 pod2usage({-exitval => 1, -output => \*STDOUT});
295 pod2usage(-exitval => 1, -verbose => 1);
297 pod2usage(-exitval => 1, -verbose => 1, -output => \*STDOUT});
306 pod2usage(-exitval => 1, -verbose => 2);
308 pod2usage({-exitval => 1, -verbose => 2, -output => \*STDOUT});
380 pod2usage(-exitval => 2, -input => "/path/to/your/pod/docs");
442 $opts{"-exitval"} = $_;
457 /^-exit/i and $_ = '-exitval';
461 ## Now determine default -exitval and -verbose values to use
462 if ((! defined $opts{"-exitval"}) && (! defined $opts{"-verbose"})) {
463 $opts{"-exitval"} = 2;
466 elsif (! defined $opts{"-exitval"}) {
467 $opts{"-exitval"} = ($opts{"-verbose"} > 0) ? 1 : 2;
470 $opts{"-verbose"} = ($opts{"-exitval"} < 2);
474 $opts{"-output"} = (lc($opts{"-exitval"}) eq "noexit" ||
475 $opts{"-exitval"} < 2) ? \*STDOUT : \*STDERR
519 exit($opts{"-exitval"}) unless (lc($opts{"-exitval"}) eq 'noexit');