From 133b2712088b44b6f5cc5ee638dced77a727254e Mon Sep 17 00:00:00 2001 From: Dan Church Date: Mon, 4 Sep 2023 10:08:36 -0500 Subject: [PATCH] Combine GetOpt::Long options --- make-block.pl | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/make-block.pl b/make-block.pl index 64cebfb..f778e4d 100755 --- a/make-block.pl +++ b/make-block.pl @@ -72,10 +72,8 @@ MAIN: { my $workdir = $FindBin::RealBin; unless (GetOptions( - 'out=s' => \$out, - 'O=s' => \$out, - 'i=s' => \$block_ip, - 'block-ip=s' => \$block_ip, + 'out|O=s' => \$out, + 'block-ip|i=s' => \$block_ip, )) { exit 2; }