I must be missing something, but this looks like a job for POSIX::strftime. I couldn't figure out what the last %s in your sprintf was for, so that's not handled.

use POSIX qw(strftime);
sub formatDTV {
    return strftime("%a., %d %b. %Y, %H:%M",@_);
}
[download]