#!/usr/bin/perl -w
die "Usage: $0 seconds\n" unless scalar @ARGV;
print scalar localtime(shift),"\n";

#include <time.h>
#include <stdio.h>

/******************************************************
*   to_real_date()
*   parms: sec  =epoch time
*          dest =string to store result
*          len  =len of string (# bytes) 
*   convert sec in epoch time to standard data & time        
*******************************************************/

char *to_real_date(char *dest, time_t sec, size_t len)
{
          /* %c format = std date and time */
	size_t result=strftime(dest,len,"%c",localtime(&sec));
	
	if(result==0)
	{
		*dest=0x0;
	}
	return dest; 
}

int main()
{
	char tmp[80]={0x0};
	
	printf("1111256774 seconds into the epoch = %s\n", to_real_date(tmp, 1111256774, 80));
	return 0;
}

echo "0t${currentEpoch}=Y" | /usr/bin/adb