| ºñµð¿À :: ÇÁ·¹ÀÓ ±×·¡ÇÁ ºñµð¿À¿¡¼ ÇÁ·¹ÀÓ ¶Ç´Â ¸ÞŸ µ¥ÀÌÅÍ °¡Á® ¿À±â |
Áö±Ý ´Ù¿î·Îµå |
ºñµð¿À :: ÇÁ·¹ÀÓ ±×·¡ÇÁ ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Michael Schilli
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~mschilli/
ºñµð¿À :: ÇÁ·¹ÀÓ ±×·¡ÇÁ ű×
ºñµð¿À :: ÇÁ·¹ÀÓ ±×·¡ÇÁ ¼³¸í
ºñµð¿À¿¡¼ ÇÁ·¹ÀÓÀ̳ª ¸ÞŸ µ¥ÀÌÅ͸¦ Àâ¾Æ¶ó Video :: Framegrab´Â ÁöÁ¤µÈ ºñµð¿À ÆÄÀÏ¿¡¼ ÁöÁ¤µÈ ½ÃÁ¡¿¡¼ ÇÁ·¹ÀÓÀ» Àâ°í JPEG Data.It¸¦ ¹ÝȯÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Àå¸é µÚÀÇ ¹«°Å¿î ¸®ÇÁÆÿ¡ ´ëÇØ MPlayer¸¦ »ç¿ëÇϹǷΠ°æ·Î ¾îµò°¡¿¡ ¼³Ä¡ÇؾßÇÕ´Ï´Ù. ...¿¡ MPlayer°¡ ´Ù¸¥ À§Ä¡¿¡ ÀÖÀ¸¸é ³» $ grabber = Video :: Framegrab-> New (mplayer => "/ path / to / mplayer", ºñµð¿À => "movie.avi"); Video :: Framegrab; ³» $ grabber = ºñµð¿À :: ÇÁ·¹ÀÓ ±×·¡ÇÁ -> new (video => "movie.avi"); ³» $ jpg_data = $ grabber-> ½º³À ( "00:00:10"); $ grabber-> jpeg_save ( "snapshot.jpg"); "ÀÌ µ¿¿µ»óÀÌ", $ grabber-> meta_data () -> {length}, "ÃÊ ±æÀÌ "³» $ P ($ grabber-> equidistant_snap_times (10))¿¡ ´ëÇÑ ¿µÈ Àüü¿¡¼ ÀÏÁ¤ÇÑ °£°ÝÀ¸·Î 10 ÇÁ·¹ÀÓÀ» ½º³ÀÇÕ´Ï´Ù. {$ grabber-> snap ($ p); $ grabber-> jpeg_save ("ÇÁ·¹ÀÓ - at- $ p .jpg ");} ¿ä±¸ »çÇ× : ¡¤ Perl.
ºñµð¿À :: ÇÁ·¹ÀÓ ±×·¡ÇÁ °ü·Ã ¼ÒÇÁÆ®¿þ¾î