$cowtime->timestamp->strftime("%Y-%m-%dT%H:%M:%S.%9N%z") =~ s/(?=..\z)/:/sr

##</code><code>##

use DateTime::Format::Foo qw( );

my $format = DateTime::Format::Foo->new(...);
$cowtime->timestamp->set_formatter($format);