[perl] epoch 秒っぽいやつを置換する - tokuhirom's blog

https://metacpan.org/pod/from_unixtime をみてやってみた｡ > cat sql_result id 1 created_at 1419702037 updated_at 1419702037 > perl -MTime::Piece -pe 's/\b(1[0-9]{9})\b/"$1(".localtime($1)->strftime("%F %T").")"/ge' < sql_result id 1 created_at 1419702037(2014-12-28 02:40:37) updated_at 1419702037(2014-12-28 02:40:37) 自分の場合だとこんぐらいのワンライナーでいいかな､と｡ 上記の正規表現は極めて雑だが､以下のように､一般的に求めたい範囲の unix time にはそれなりにマッチする｡ > ep

[C_L]

2033年問題を抱えるワンライナー 弊社32bitとかわかろうとしない人がいるのでこの手のネタを楽しめない残念さがある

[yassan0627]

これは便利！

[karupanerura]

epochコマンド便利っぽい

[tokuhirom]

New post: "[perl] epoch 秒っぽいやつを置換する"

[hitode909]

便利