http://www.songmu.jp/riji/archives/2013/02/2013getoptlong.htmlhttp://d.hatena.ne.jp/tagomoris/20120918/1347991165my $p = Getopt::Long::Parser->new( config => [qw(posix_default no_ignore_case auto_help)] ); $p->getoptions( 'version!' => \$version, );オプションのこまかいところはsongmuさんとtagomorisさんの記事をみてもらうとして、なにがいいたいかというと、Getopt::Long は OO インターフェイスがあるので、OOインターフェイスをつかった方がゆとり教育をうけている世代のみなさんにも理解しやすいとおもいます。