かなり遅いよ、perlで外部コマンド実行したら。

相当な差がある。
コード的には段階踏んでるが。