使用不同语言计算时间差

#通过将日期转换成1970年1月1号到当前天的秒数进行计算

---shell

#!/usr/bin/ksh
#echo $((($(date -d "20170504" +%s )-$(date -d "20170501" +%s ))/(24*3600)))  
if [[ $# -ne 2 ]]; then
    usage()
fi
function usage(){
    echo "please input param:args1 args2"
    exit(-1)
}

if [ $1 -lt $2 ]; then
    date1=$2
    date2=$1
else
    date1=$1
    date2=$2
fi
echo $((($(date -d "$date1" +%s )-$(date -d "$date2" +%s ))/(24*3600)))

---perl

#!/usr/bin/perl
use strict;
use warnings;
use Time::Local;
sub getminusday{
    my ($day1,$day2) = @_;
    if (length($day1) ne 8 || length($day2) ne 8){
        print "\n 日期 $day1 或 $day2 错误，必须是类似 yyyymmdd 的8位格式！";
        return 0;
    }
    my $time1=timegm(1,1,1,substr($d