Pod::Usage

Pod::Usage

NAME

Pod::Usage - print a usage message from embedded pod documentation

SYNOPSIS

use Pod::Usage

my $message_text  = "This text precedes the usage message.";
my $exit_status   = 2;          ## The exit status to u