А программу-то зачем? Тут даже перл не нужен. На обычном shell пишется. Ну, еще sed или awk нужен для выбора соотвествущей позиции из строки. Если до завтра никто не сделает - займусь. Сейчас уже домой хочется....