短いプログラムなので、良かったら参考にして下さい。