2014-07-08 4 views
0

저는 Perl에 비교적 익숙하지 않습니다. 아래에서 자세히 설명하는 쿼리가 있습니다.epoch에서 밀리 초 단위로 타임 스탬프를 변환하고 차이를 계산하여 특정 형식으로 표시해야합니다.

다른 프로그램에서 검색 한 타임 스탬프 (밀리 초 단위)입니다. 시간 1 = 1,404,819,151,646 타임 2 = 펄 서브 루틴이 시대를 전달하고 형식 아래 사이의 차이를 얻을하는 방법 1,404,819,485,977

: seconds.milliseconds

참고 : 나는 타임 스탬프이기 때문에 가정하고 밀리 초 단위이고 Perl은 Time2와 Time1의 차이를 계산하고 있으며, 날짜 변경 또는 월 변경과 같은 코너 사례도 처리합니다. 내가 틀렸다면 나를 바로 잡아라.

도와주세요!

답변

1

차이를 계산하고 1000으로 나누어 초를 구하십시오. 밀리 초는 날짜, 월 등을 신경 쓰지 않습니다.

sub diff { 
    my ($aa, $bb) = @_ 

    return ($bb - $aa)/1000; 
} 
+0

감사합니다. "Jul 8 2014 17 : 59 : 55.455"형식이 맞았습니까? –

+1

@NitinSagar'Jul 8 2014 17 : 59 : 55.455'는 타임 스탬프가 아니므로 밀리 초 단위로 변환하려면 모듈이 필요합니다. –