perl でリダイレクトをする方法 殆どperlを触らずに来たので、何かもう簡単なものから勉強中。 plファイルを踏んだら最後にリダイレクトをするものを作りたかったのですが、 そもそもリダイレクトってどうやるんだろう？ と思って調べた。 ら、出てきたんですが、 ...
もっと読む
カテゴリ： perl
perlで頑張って、１カラム目だけゼロ埋めして、あとはそのまま
perlで頑張って、１カラム目だけゼロ埋めして、あとはそのまま cat data.txt | perl -ne 'split(/\t/,$_,2); if ($_[0] ne "") {printf "%06s\t%s",$_[0],$_[1]} else { printf $_ }' タブ区切りのデータで、１カラム目だけゼロ埋め。 あとは可変なので行く付かるか ...
もっと読む
unixで行列変換するコマンド
タブ区切りの出力を行列変換したいので、コマンド作成。 この内容で実行ファイルを作る awk -F'\t' ' { for (i = 1; i <= NF; i++) tmp[i] = tmp[i] "\t" $i } END { for (i = 1; i <= NF; i++) { sub(/^\t/, "", tmp[i]) print tmp[i] } }' ...
もっと読む
