Imager::Marqueeã€ã‚ã‚‹ã„ã¯ã€æºã‚Œã‚‹ã‚¤ã‚±ãƒ¡ãƒ³ - Kentaro Kuribayashi's blogç”»åƒã‚’å·¦å³ã«å‹•ã‹ã—ãŸã‚Šæºã‚‰ã—ãŸã‚Šã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’作æˆã—ã¾ã—ãŸã€‚ https://github.com/kentaro/imager-marquee 以下ã€ä½¿ã„方を説明ã—ã¾ã™ã€‚ ãŸã¨ãˆã°ã“ã“ã«ã€ã‚¤ã‚±ãƒ¡ãƒ³ã‚’写ã—ãŸç”»åƒãŒã‚ã‚Šã¾ã™ã€‚ 確ã‹ã«ã‚¤ã‚±ãƒ¡ãƒ³ã§ã™ã€‚ã—ã‹ã—ã€ã—ã°ã‚‰ãã»ã‚Œã¼ã‚Œã¨çœºã‚ã¦ã„ã‚‹ã†ã¡ã«ã€ã„ãらイケメンã¨ã¯ã„ãˆã€å‹•ããŒãªã„ã¨ã¡ã‚‡ã£ã¨é£½ãã¦ã—ã¾ã†ã®ã‚‚事実(「美人ã¯3æ—¥ã§é£½ãã‚‹ã€ã¨ã‚‚ã„ã„ã¾ã™ã—)。ã“ã‚Œã§ã¯ã€ã›ã£ã‹ãã®ã‚¤ã‚±ãƒ¡ãƒ³ã‚‚片無ã—ã§ã™ã€‚ãã“ã§ã€ã¡ã‚‡ã£ã¨å‹•ãã‚’ã¤ã‘ã¦ã¿ã¾ã—ょã†ã€‚ use strict; use warnings; use Imager::Marquee; my $image = Imager::Marquee->new(file => shift); $image->marquee(3)->write( file => 'marquee.gif', gif_loop => 0,
{{#tags}}- {{label}}
{{/tags}}