print "$login_time\n"  if  $self->{'debug'};
my ($dbyear, $dbmon, $dbmday, $dbhour, $dbmin, $dbsec ) = ($login_time =~ /^(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)$/);
print "$login_time\n$dbyear, $dbmon, $dbmday, $dbhour, $dbmin, $dbsec\n"  if  $self->{'debug'};


##</code><code>##

1990-01-01 00:00:00.000
1990-01-01 00:00:00.000
, , , , ,