$str =~ m/^T \+(.*) \+(.*) \d+-\w+-\d+ \d+:\d+:\d+ \d+/; print $1, " ", $2