Unixスタイルのプログラムパラメータの処理をしてくれるモジュールがGetoptなのに
頻繁に使用してみるとcodesnipetに使用しようと、私が使用するテンプレートをここに登録しておく。
main :: HELP_MESSAGE（）、main :: VERSION_MESSAGE（）
を実装しておくと - help、 - versionオプションに反応して、getopts（c：hv）に使用するオプションの一覧を表示してください。
上記の例ではcの後に：の意味は、パラメータを受け取るという意味である。
入力されたパラメータは、$ Getopt :: Std :: opt_cとして使用することができます。
＃！/ usr / bin / perl
＃vim：set sw = 4 ts = 4 si et nu：
use strict;
Std ; use Getopt :: Std;
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃ ＃＃＃＃＃＃
＃Global settings
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃ ＃＃＃＃＃＃
Std :: STANDARD_HELP_VERSION = 1 ; $ Getopt :: Std :: STANDARD_HELP_VERSION = 1;
VERSION_MESSAGE ( ) { sub main :: VERSION_MESSAGE（）{
; print "$ 0 Version 0.5 hyeonkwen@gmail.com";
}
HELP_MESSAGE ( ) { sub main :: HELP_MESSAGE（）{
print << END;
Description of this program。
Usage：$ 0 OPTION DIRECTORY
OPTION
-c description of c option
-h view help message
-v view version information
END
}
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃ ＃＃＃＃＃＃
＃main（）
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃ ＃＃＃＃＃＃
sub main（）{
! getopts ( "c:hv" ) || $Getopt :: Std :: opt_h ) { if（！getopts（ "c：hv"）| | $ Getopt :: Std :: opt_h）{
( ) ; main :: HELP_MESSAGE（）;
exit;
( $Getopt :: Std :: opt_v ) { } elsif（$ Getopt :: Std :: opt_v）{
( ) ; main :: VERSION_MESSAGE（）;
exit;
}
}
main（）;
