在Solaris(Unix)上获取一个小时前的时间

试了很多方法，发现如下方法最适合在Solaris（Unix），
在Solaris(Unix)上获取一个小时前的时间格式：YYYYMMDDHH
perl -le ‘@a=localtime(time-3600);printf(“%04s%02s%02s%02s”,$a[5]+1900,$a[4]+1,$a[3],$a[2]);’
>2018012214