'자막 파일'에 해당되는 글 1건

  1. 2008.11.06 :: 자막 싱크를 조정해주는 perl 스크립트 (2)
어둠의 세계에서 영화 파일과 자막 파일을 따로 구했더니 자막와 화면이 싱크가 맞지 않는다. 수작업으로 일일이 고치기도 귀찮고 그렇다고 리눅스용 영화 재생기가 자막 싱크 조정 기능이 있는 것도 아니고. 그래서 간단한 perl 스크립트를 짜서 해결했다. 참고로 샘플 스크립트는 자막을 6.5초 앞으로 끌어당기는 예시이다.
while(<STDIN>) {
    if( /(^.*SYNC START=)(\d+)(.*?)$/ ) {
        $t = $2 - 6500;
        print $1, $t, $3, "\n";
    } else {
        print $_;
    }
}

posted by 신묘군

댓글을 달아 주세요

  1.  Addr  Edit/Del  Reply aero

    one-liner 버젼입니다.

    perl -npe 's/(SYNC START=)(\d+)/$1.($2-6500)/e' jamak.smi

    2008.11.07 17:53
    •  Addr  Edit/Del 신묘군

      감사합니다. 더 간단하게 할 수 있을거라고 생각은 했는데 perl에서 손을 뗀 지 7년쯤 되니까 가물가물... 이렇게 하면 되겠군요. ^^

      2008.11.07 19:45