##
use warnings;
####
use strict;
use warnings;
my $timeLimit = ' ';
my ($startTime) = $timeLimit =~ /startTime="(.*?)"/;
chomp($startTime);
if (my ($endTime) = $timeLimit =~ /endTime="(.*?)"/)
{
chomp($endTime);
print "[$startTime],[$endTime]\n";
}
else
{
print "[$startTime]\n";
}