NAME Pod::Usage::Return - pod2usage that returns instead of exits VERSION version 0.002 SYNOPSIS use Pod::Usage::Return; use Pod::Usage::Return qw( pod2usage ); exit pod2usage(0); sub main { return pod2usage("ERROR: An error occurred!") if $ERROR; } exit pod2usage( -exitval => 1, -message => 'ERROR: An error occurred' ); DESCRIPTION This is a drop-in replacement for Pod::Usage "pod2usage" that returns the exit value instead of calling exit.g FUNCTIONS pod2usage See Pod::Usage for documentation. Returns the exit code instead of calling exit(). AUTHOR Doug Bell COPYRIGHT AND LICENSE This software is copyright (c) 2014 by Doug Bell. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.