不要になった行を削除
add tcc script "perror"