Help for this page
Last date 20110101 Bill date 20181205 Data 20110102 Last date 20110101 Bill date 20181205 Data 20110103 ... Last date 20110101 Bill date 20181205 Data 20111030 Last date 20110101 Bill date 20181205 Data 20111030 ......
$last_date = <STDIN>; chomp $last_date; ... $return_date = sprintf "%04d%02d%02d", $t[0], $t[1], $t[2]; return $return_date; }