前回と同じ手順で SPITZのラジオの番組表を作りたい。
スピッツ最高。いつ聴いても最高。
myradikosearchChannel 全国の局の一覧を返す 例：FMFUKUI 福井
./myradikoBANGUMI.sh 引数に取った局の番組表を返す（xmlで）
こんなんしまして
$ L=myradikolistSPITZ.txt; for i in $(myradikosearchChannel | awk '{print $1}' ); do echo "$i"_@ | tee -a "$L";./myradikoBANGUMI.sh "$i" | grep -B 1 SPITZ | grep -B 3 title | tee -a "$L";done
$ cat myradikolistSPITZ.txt
progの行で 開始時刻（ft） と 終了時刻（to）が読み取れる。
で、progの直前の行がラジオ局名なわけだ。
てことはprogとその直前の行だけを取り出しせねばならない。catとgrepでやる。
grep -B(efore) 1 prog とやれば、progの前（Before）の1行が取れる。
$ cat myradikolistSPITZ.txt | grep -B 1 prog
さて、あとは
FMMIE_@の行と progの行を 繋げれば
局名（FM三重）と 開始終了時刻 が1行に入る。
改行の取り去りが難しい。cat と sed でやる。
$ cat myradikolistSPITZ.txt | grep -B 1 prog | sed -z s/'_@\n'/''/g
すげ。GNU sed では sed -z で改行を取り去れるらしい。
このサイト天才。いつも勉強になる。
ここまでくれば、あとはちょっと加工してCSVにする。
$ cat myradikolistSPITZ.txt | grep -B 1 prog | sed -z s/'_@\n'/''/g | awk -F= '{print $1,$2,$3}' | sed -e s/'<prog ft '/''/g | sed -e s/'to'/''/g | sed -e s/'ftl'/''/g |sed -e s/'"'/''/g | sed -e s/'--'/''/g | sed -z s/' \n'/''/g | sed -e s/' '/','/g | sed -e s/',,,,,,,,,,'/','/g | sed -e s/',,'/','/g
うむ。
もう少し加工する。
cat myradikolistSPITZ.txt | grep -B 1 prog | sed -z s/'_@\n'/''/g | awk -F= '{print $1,$2,$3}' | sed -e s/'<prog ft '/''/g | sed -e s/'to'/''/g | sed -e s/'ftl'/''/g |sed -e s/'"'/''/g | sed -e s/'--'/''/g | sed -z s/' \n'/''/g | sed -e s/' '/','/g | sed -e s/',,,,,,,,,,'/','/g | sed -e s/',,'/','/g | sed -s s/'00,'/','/g | sed -z s/',\n'/'\n'/g | sort -t, -k 1 | uniq | sort -t, -k 2
末尾に文字列を足す。vimでやる。
'<,'>s/\n/,SPITZ\r/g
あとは前回と同じスクリプトに食わせる。
