Getopt :: Fancy. getOpt :: Fancy는 최종 사용자 행복에 초점을 맞춘 명령 줄 옵션을 처리하는 객체 접근 방식입니다.
지금 다운로드

Getopt :: Fancy. 순위 및 요약

Getopt :: Fancy. 태그

Perl 모듈 명령 줄 손질 객체 접근법

Getopt :: Fancy. 설명

GetOpt :: Fancy는 최종 사용자 행복에 초점을 맞추어 명령 줄 옵션을 처리하는 객체 접근 방식입니다. getOpt :: fancy는 명령 줄 옵션을 처리하는 개체 접근 방식입니다. 내 $ opts = getopt :: fancy-> new (); $ opts-> add ( "db", gt => "= s", ex => "", desc => ") 모든 데이터베이스에 대해 설정 해제하십시오.", def => "teen_titans", 허용 = > , regex => '^ + $', req => 0, section => "필수 DB params" ); # 설정된 옵션을 허용합니다 $ opts-> add ( "celect_args", desc => ""모든 옵션을 인쇄 ", 섹션 =>"misc params "); # 사용자가 옵션 목록을 지정할 수 있도록 / $ opts-> add ( "help", gt => ": s @", ex => "", desc => " 옵션 이름을 지정하면 모든 옵션에 대한 도움말을 인쇄 할 것입니다. 그렇지 않으면 all. ", 섹션 =>"misc params ", commas => 1); # 명령 줄 옵션 가져 오기 내 $ error_msg = $ opts-> get_options (); print_usage ($ error_msg) $ error_msg 인 경우; 인쇄 "이 데이터베이스 덤프 : $ opts -> {db} n"; "사용자가 다음에 도움말 정보를 원합니다." 가입 ( ",", @ $ opts -> {help}})). "N"($ opts -> {help}); print_usage () $ opts-> {help} 인 경우; print_args () $ opts -> {check_args} 인 경우; sub print_args {$ opts-> get_values () 인쇄; 출구 (0); } sub print_usage {나의 $ hopts; MY $ MSG = SHIFT; $ hopts = $ opts -> {help} (scalar @ {$ opts -> help}} == 0); 인쇄 "사용법 : $ 0 n"; $ opts-> get_usage ($ hopts)를 인쇄하십시오. $ msg 인 경우 "오류 : $ msgn"인쇄; 출구 (0); } getopt :: 팬은 기본값, 허용 된 값, 사용자 친화적 인 설명, 필수 플래그 및 패턴 일치 요구 사항을 포함하여 스크립트의 한 위치에 명령 줄 옵션을 모두 허용합니다. OFTTimes Script 작가 사용법 정보에 대한 Skimp 또는 Dated Help Information이 있습니다. 이 모듈은 작가가 더 나은 시민이 될 수 있도록 도와줍니다.이 모듈은 GetOpt :: Long를 사용하므로 동일한 규칙이 적용됩니다 .Requirements : · Perl 요구 사항 : · Perl.

Getopt :: Fancy. 관련 소프트웨어