perl - æ–‡å—å‚照を(en|de)codeã™ã‚‹ : 404 Blog Not Found2008å¹´05月11æ—¥21:00 カテゴリLightweight LanguagesTips perl - æ–‡å—å‚照を(en|de)codeã™ã‚‹ ã™ã§ã«æ£è§£ãŒæ›¸ã‹ã‚Œã¦ã„ã¾ã™ãŒã€ [ã‚’] Unicode ã®16進数ã®å®Ÿä½“å‚照をæ£è¦è¡¨ç¾ãªã©ã§å…ƒã«æˆ»ã™ pack 㨠Encode::decode を使ã†ã¨è‰¯ã„ã¿ãŸã„。 ã¯ã¦ãªãƒ–ックマーク - miyagawaã®ãƒ–ックマーク / 2008å¹´05月11æ—¥ ãã‚Œ HTML::Entities::decode / regexp ã§ã‚‚ chr(hex($1)) ã®ã»ã†ãŒã‚ã‹ã‚Šã‚„ã™ããªã„ã‹ãª ç¹°ã‚Šè¿”ã—ã¦ãŠãã ã‘ã®ä¾¡å€¤ã¯ã‚ã‚‹ã®ã§ã€‚ HTML::Entitiesを使ㆠã¾ãšã€HTML::Entitiesã®decode_entities()を使ã†ã¨ã„ã†æ–¹æ³•ãŒã‚ã‚Šã¾ã™ã€‚ã“ã‚ŒãŒãƒ™ã‚¹ãƒˆãƒ—ラクティスã‹ãªã€‚ #!/usr/local/bin/perl use strict;
{{#tags}}- {{label}}
{{/tags}}