読者です 読者をやめる 読者になる 読者になる

53歳限界プログラマの憂鬱

SU/CAR-ST-APplication-cellsから派生したプログラマのブログ

本家はこちら↓
f:id:sucar:20151115183011p:plain

SU/CAR-ST-APplication-cellsの安倍野ミックスと申します
来訪ありがとうございます
シストレツールを自作してます

f:id:sucar:20150414193802p:plain

date1000 1000日分日付index作成

現在から遡って1000日分の日付indexを作成するコマンド date1000を作成

date1000

---------------------------------------------

#!/bin/bash
#tac 代用 perl -e 'print reverse <>'
#http://qiita.com/b4b4r07/items/e465efe0b020407bdd44
perl -e 'print reverse <>' ../Protra/data/price/1/1001.csv | awk 'BEGIN {FS=","} NR<=1000 && NR>0 {print $1}' > ./code/date.cfg
perl -e 'print reverse <>' ./code/date.cfg > ./code/date_r.cfg

---------------------------------------------

結局一つ前の記事

 

の、perl -e 'print reverse <>'  とawk で作成

簡単に解説すると

../Protra/data/price/1/1001.csv には日経平均データが入ってて、それを逆順にして 

行番号範囲で頭(日付indexが入ってる)だけをawkで出力

って感じ

こんな感じでコマンドを作成し、それらを組み合わせたコマンドを積み上げていく感じでシステム作っていきます

※実行時間 0.437s まあ一瞬