使用 perl 获取一天之后的日期

GNU 的 date 命令有很强大的 -d 功能,比如 date -d “2 days” 可以获取两天之后的日期,但 solaris 没有。所以用 perl 实现一下,用于在脚本中使用。如: