M.C.P.C.: PostScriptã®8進数エンコーディングをデコードã™ã‚‹ãƒ¯ãƒ³ãƒ©ã‚¤ãƒŠãƒ¼PostScriptã®8進数エンコーディングをデコードã™ã‚‹ãƒ¯ãƒ³ãƒ©ã‚¤ãƒŠãƒ¼ スãƒãƒ³ã‚µãƒ¼ãƒ‰ãƒªãƒ³ã‚¯ Tweet 昨日ã®ã‚¨ãƒ³ãƒˆãƒªã§ä½¿ã£ãŸ PostScript エンコーディングをデコードã™ã‚‹ãƒ¯ãƒ³ãƒ©ã‚¤ãƒŠãƒ¼ã«ã¤ã„ã¦èª¬æ˜Žã—ã¾ã™ã€‚ ワンライナー Unix ã‚„ Mac OS X ã§ã¯ã€ã“ã‚“ãªæ„Ÿã˜ã§å®Ÿè¡Œã—ã¦ãã ã•ã„。 $ more hoge.ps | perl -pe 's/\\([0-7]{3})/pack("C",oct($1))/ego;' Windows+ActivePerl ã§ã¯ã“ã‚“ãªæ„Ÿã˜ã§å®Ÿè¡Œã—ã¦ãã ã•ã„。シェルã®é–¢ä¿‚ã§ã€ãƒ€ãƒ–ルクォーテーションã¨ã‚¢ãƒã‚¹ãƒˆãƒãƒ•ã‚£ã‚’入れ替ãˆã¾ã—ãŸã€‚ >more hoge.ps | perl -pe "s/\\([0-7]{3})/pack('C',oct($1))/ego;" 使用例 昨日ã®ã‚¨ãƒ³ãƒˆãƒªã§å‡ºã—ãŸã€OPI コメントを解èªã—ã¦ã¿ã¾ã™ã€‚ Windows+Activ
今日ã®CPANモジュール（跡地） 目次
Perl-æ£è¦è¡¨ç¾ - Wikibooks
インターン講義åˆæ—¥ã€ŒPerlã«ã‚ˆã‚‹ã‚ªãƒ–ジェクト指å‘プãƒã‚°ãƒ©ãƒŸãƒ³ã‚°ã€ - Hatena Developer Blog
http://qootas.org/blog/archives/2006/06/perl_regex_perf.html
{{#tags}}- {{label}}
{{/tags}}