PerlはよくわからないからWebProg板で質問してくれ>>1