perl 分析pmts日志

use HTTP::Date qw(time2iso str2time time2iso time2isoz); use POSIX; use DBI; my $dbName = 'tlyy'; my $dbUser = 'tlcbuser'; my $dbUserPass = 'tlcbuser'; my $dbhload = DBI->connect("dbi:Oracle:$d

>>阅读原文<<