キャレッジリターンを削除するperlスクリプト