#!/usr/bin/perl -w 
use strict;
use Data::Dumper;
my $line=<DATA>;

chomp $line;

my @f=split(',',$line);

my $dt1=shift @f;
my $dt2=shift @f;

printf "%s,%s,%s\n",scalar localtime($dt1),scalar localtime($dt2),join(",",@f);

exit(0);

__END__
1345752662, 1345752673, CLOSED, CRITICAL, Other fields etc