>>300
perlならENVってハッシュにはいってる。
診断君はソース公開されてたはず。