perl -e "$p=1970;print ((int($p/4)-int($p/100)+int($p/400)+$p*365)*24*60*60)
62167132800
だけどグレゴリオ暦導入までの改暦経緯とかうるう秒とかどうすんだろ