Skip to content

Instantly share code, notes, and snippets.

@Skeeve
Skeeve / gist:cf596b335f6cb16f2762d1f95e297ccb
Created Oct 30, 2020
Mojo::Command usage using Pod::Usage
View gist:cf596b335f6cb16f2762d1f95e297ccb
has usage => sub {
my $pod = '';
open my $printpod, '>', \$pod;
pod2usage(
-input => __FILE__,
-verbose => 1,
-exitval => 'NOEXIT',
-output => $printpod,
);
close $printpod;