diff options
Diffstat (limited to 'pastebin')
-rwxr-xr-x | pastebin/website-pastebin | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/pastebin/website-pastebin b/pastebin/website-pastebin index a964449..0426584 100755 --- a/pastebin/website-pastebin +++ b/pastebin/website-pastebin @@ -46,11 +46,15 @@ GetOptions( 'help|h|?' => \$help, 'title|t=s' => \$title ) or pod2usage(-verbose => 1, -exitval => 2); -pod2usage(-verbose => 2, -exitval => 0) if $help; - -if (!$title) { - die "Missing required --title argument."; -} +pod2usage( + -verbose => 2, + -exitval => 0 +) if $help; +pod2usage( + -verbose => 1, + -exitval => 2, + -message => "Missing required --title argument." +) if !$title; # Taken from: # https://stackoverflow.com/a/4009519 @@ -65,7 +69,6 @@ sub slugify { return $input; } - our $dirname = dirname(__FILE__); our $in = "$dirname/skeleton.org"; our $out; |