??

The code I posted shows how to get the desired output specified in the OP.

It also addresses the input pattern issue, since I believe it is unlikely that the input data is actually like 3/11/16, 00, Mar, 2016 and that it's more likely the OP made an error with his pattern that his input data masked.

Update: reply to (unmarked) addition above:

"The object will print out a date if it didn't fail, so the input is clearly legit in this case. OP just needs to know how to dump it properly."

Actually I would say it's rather important to get the right parsed datetime, not simply that "the object ... didn't fail." It's not the input that's at issue, it's the pattern used to parse the input.

We won't know unless OP provides input data. I'm always up to learning, and being corrected.

You could use regexpression

#!/usr/bin/perl -w

use Time::Piece;
use strict;

my $date = '3/11/16, 00, Mar, 2016';
Time::Piece->strptime($date, '%D, %M, %b, %Y') =~ /^(.+)\d\d:\d\d:\d\d
+ (.+)$/ ;
my $date1 =join ' ',$1,$2;
print "$date1\n";
[download]