percol版cdrをpecoで書き換え