GetOptions 유틸리티를 사용하여 Perl에서 '선택적'명령 줄 인수를 처리하는 방법?

Question

이 예상되는 경우에만 명령 줄 인수, 적절한 메시지와 다른 출구를 처리하는 GetOptions 유틸리티를 사용하는 방법을 설명하는 많은 펄 튜토리얼이 있습니다. 도움말 표시 : 출력을

-h 지퍼 : 내 요구 사항에

나는

• -z zip_dir_path는 선택 명령 줄 인수, 등이 다음있다.

은 나를 위해 작동하지 않았다 GetOptions와 함께 몇 가지 조합을 시도했다.
그래서 내 질문은 : 어떻게 이러한 요구 사항을 처리하기 위해 GetOptions를 사용 하는가?

편집 : -z 요구 '우편 디렉토리 경로'

EDIT2 : 내 스크립트가 강제 명령 줄 인수 다음

• -in input_dir_path : 입력 디렉토리
• -out output_dir_path :
  : 출력 디렉토리
여기

내 코드입니다

my %args; 
GetOptions(\%args, 
"in=s", 
"out=s" 
) or die &usage(); 

die "Missing -in!" unless $args{in}; 
die "Missing -out!" unless $args{out}; 

희망이 EDIT 더 선명도를 추가합니다.

Answer 1

A : (colon)은 선택 옵션을 표시 할 수 있습니다 당신이를 지정하고 빈 문자열을 선택하면

: type [ desttype ] 
     Like "=", but designates the argument as optional. If omitted, an 
     empty string will be assigned to string values options, and the 
     value zero to numeric options. 

을, 당신이 알고있는 사람 사용자가 지정하지 않았습니다.

Answer 2

이것은 당신이 명령 줄에서 무엇을 얻을 입력 인수에 따라 $zip_output 및 $show_help의 1 또는 0 값으로 설정해야합니다. 문서에서

#!/usr/bin/env perl 

use strict; 
use warnings; 

use Getopt::Long; 

my ($zip, $help, $input_dir, $output_dir); 

GetOptions(
    'z:s' => \$zip, 
    'h'  => \$help, 
    'in=s' => \$input_dir, 
    'out=s' => \$output_dir, 
); 

Answer 3

:

use strict; 
use warnings; 

use Getopt::Long; 

my $zip_output; 
my $show_help; 

GetOptions("z" => \$zip, "h" => \$show_help);