#!/usr/local/bin/perl -p

s/\[(\d{10})\]/'[' . scalar( localtime( $1 ) ) . ']'/e;