perl 失敗集 |
作成日:2003-05-29 最終更新日: |
perl で犯した失敗をしないように、まとめてみました。 失敗そのものを書いていないので、役に立たないかな?
use Getopt::Std;
getopts('D:tw');
print "-D : $opt_D\n" if ($opt_D);
print "-t defined\n" if ($opt_t);
print "-w defined\n" if ($opt_w);
まりんきょ学問所 > Perl 手習い > Perl 失敗集