[B! *perl] swatã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯

swat id:swat

*perlã«é–¢ã™ã‚‹swatã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ (12)

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

${{author_name}}$
{{author_name}}{{created}}
{{ #comment }}{{ comment }}{{ /comment }}
- {{ label }}

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

PerlåŸºç¤Žæ–‡æ³•æœ€é€Ÿãƒžã‚¹ã‚¿ãƒ¼ - Perlå…¥é–€ã‚¼ãƒŸ
Perl â€º åŸºç¤Žæ–‡æ³• ITã®ç¾å ´ã§PerlãŒå¿…è¦ã«ãªã£ã¦ã€ä»Šå‹‰å¼·ã—ã¦ã„ã‚‹ã¨ã„ã†æ–¹ã¯ãŠã‚‰ã‚Œã¾ã›ã‚“ã‹? ä»–ã®è¨€èªžã‚’ã‚ã‚‹ç¨‹åº¦çŸ¥ã£ã¦ã„ã‚‹æ–¹ãŒã€ŒPerlåŸºç¤Žæ–‡æ³•æœ€é€Ÿãƒžã‚¹ã‚¿ãƒ¼ã€ã‚’èªã‚ã°ã€Perlã®ä½¿ã„æ–¹ã®åŸºç¤Žã‚’ãƒžã‚¹ã‚¿ãƒ¼ã—ã¦Perlã‚’æ›¸ãã“ã¨ãŒã§ãã‚‹ã‚ˆã†ã«ãªã£ã¦ã„ã¾ã™ã€‚ åŸºç¤Ž æ–‡æ³•ãƒã‚§ãƒƒã‚¯ æ–‡æ³•ã‚’ãƒã‚§ãƒƒã‚¯ã‚’åŽ³ã—ãã™ã‚‹ãŸã‚ã«æœ€åˆã«å¿…ãšæ¬¡ã®2è¡Œã‚’æ›¸ãã‚ˆã†ã«ã—ã¾ã™ã€‚ use strict; use warnings; ã€Œuse strictã€ã¨ã€Œuse warningsã€ã¨ã„ã†2è¡Œã‚’åŠ ãˆã‚‹ã“ã¨ã§äº‹å‰ã«æ–‡æ³•ãƒã‚§ãƒƒã‚¯ãŒè¡Œã‚ã‚Œã‚‹ã®ã§ã€ã‚½ãƒ¼ã‚¹ã‚³ãƒ¼ãƒ‰ã‚’è¨˜è¿°ã™ã‚‹ä½œæ¥ã¯é€Ÿããªã‚Šã€ã‚³ãƒ¼ãƒ‰ã®å“è³ªãŒä¸ŠãŒã‚Šã¾ã™ã€‚ printé–¢æ•° æ–‡å—åˆ—ã‚’å‡ºåŠ›ã™ã‚‹ã«ã¯printé–¢æ•°ã‚’ä½¿ç”¨ã—ã¾ã™ã€‚ print "Hello world"; Perlã§ã¯æ¨™æº–é–¢æ•°ã‚„äº‹å‰ã«å®šç¾©ã•ã‚Œã¦ã„ã‚‹é–¢æ•°ã§æ‹¬å¼§ã‚’çœç•¥ã™ã‚‹ã“ã¨ãŒã§ãã¾ã™ã€‚ ã‚³ãƒ¡ãƒ³ãƒˆ Perlã®ã‚³ãƒ¡ãƒ³ãƒˆã§
swat 2010/01/25
*perl

*programming

å…¥é–€

*dev
ãƒªãƒ³ã‚¯
åˆå¿ƒè€…ã«ã‚‚ãŠå‹§ã‚ã®ã‚¹ã‚¯ãƒªãƒ—ãƒˆè¨€èªžâ€œPerlâ€å‘ã‘çµ±åˆé–‹ç™ºç’°å¢ƒã€ŒPadreã€NOT SUPPORTED
swat 2009/11/13
*perl

windows

*programming

*tools

*ã‚ã¨ã§è©¦ã™
ãƒªãƒ³ã‚¯
ç¾ä»£çš„ãªPerlã®è¨˜è¿°æ–¹æ³•ä¸€è¦§ - Perlå…¥é–€ã‚¼ãƒŸ
Perl â€º here Perl5.8ä»¥é™ã«ãŠã‘ã‚‹æ¨™æº–çš„ãªPerlã®æ›¸ãæ–¹ã‚’è§£èª¬ã—ã¾ã™ã€‚ ã‚¤ãƒ³ã‚¿ãƒ¼ãƒãƒƒãƒˆã§æ¤œç´¢ã™ã‚‹ã¨Perl4ã®ã“ã‚ã®å¤ã„è¨˜è¿°ãŒãŸãã•ã‚“ã‚ã‚Šã¾ã™ã€‚ã¾ãŸæ›¸ç±ãªã©ã®å¤šãã‚‚Perl4ã®è¨˜æ³•ã§æ›¸ã‹ã‚Œã¦ã„ã¾ã™ã€‚Perl4ã®è¨˜æ³•ã¯è¤‡é›‘ã«ãªã‚Šã‚„ã™ãé–“é•ã„ã‚’ç”Ÿã¿ã‚„ã™ã„ã®ã§ã“ã‚Œã‹ã‚‰Perlã‚’æ›¸ãäººã¯Perl5ã®ç¾ä»£çš„ãªè¨˜æ³•ã§è¨˜è¿°ã™ã‚‹ã“ã¨ã‚’å¼·ããŠå‹§ã‚ã—ã¾ã™ã€‚ strictãƒ—ãƒ©ã‚°ãƒžã¨warningsãƒ—ãƒ©ã‚°ãƒž (å¿…é ˆ) strictãƒ—ãƒ©ã‚°ãƒžã¨warningsãƒ—ãƒ©ã‚°ãƒžã‚’æœ‰åŠ¹ã«ã—ã¾ã™ã€‚ use strict; use warnings; use strict;ã¨use warnings;ã®ï¼’è¡Œã¯ã‚¹ã‚¯ãƒªãƒ—ãƒˆã®æœ€åˆã«å¿…ãšè¨˜è¿°ã—ã¦ãã ã•ã„ã€‚ã“ã‚Œã‚‰ã¯Perlã®æ–‡æ³•ãƒã‚§ãƒƒã‚¯ã‚’åŽ³ã—ãã™ã‚‹ãŸã‚ã®ã‚‚ã®ã§ã™ã€‚é¢å€’ã ã¨ã„ã†è»½ã„æ°—æŒã¡ã§ã“ã‚Œã‚’è¨˜è¿°ã—ãªã„ã¨å¾Œã€…æœ¬å½“ã«é¢å€’ãªã“ã¨ã«ãªã‚Šã¾ã™ã€‚ use strict;ã¨use wa
swat 2009/11/05
*perl

*programming

*ã‚ã¨ã§èªã‚€

*tips

*ã¾ã¨ã‚
ãƒªãƒ³ã‚¯
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
swat 2009/03/24
*programming

cpan

*perl

regex

*tips
ãƒªãƒ³ã‚¯
404 Blog Not Found:perl - Regexp::Assembleã®ã‚¹ã‚¹ãƒ¡
2007å¹´04æœˆ19æ—¥15:00 ã‚«ãƒ†ã‚´ãƒªLightweight Languages perl - Regexp::Assem bleã®ã‚¹ã‚¹ãƒ¡ ã¨ã„ã†ã‚ã‘ã§ã€Regexp::Assem bleã®ã”ç´¹ä»‹ã€‚ PERL HACKS(æ—¥æœ¬èªžç‰ˆ) [è‹±èªžç‰ˆ] odz buffer - ãã‚Œ Regexp::Assem bleã‚“ï¼Ÿãƒ«ãƒ¼ãƒ—äº‘ã€…ã‚’æŠœãã«ã—ã¦ã€ã“ã†ã„ã†ã®ã¯ Regexp::Assem ble ã®å‡ºç•ªã˜ã‚ƒãªã„ã®ï¼Ÿ ã™ã§ã«Perl Hackerså¾¡ç”¨é”ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã¨ãªã£ã¦ã„ã¾ã™ãŒã€ã¾ã çŸ¥ã‚‰ãªã„æ–¹ã‚‚ã„ã‚‰ã£ã—ã‚ƒã‚‹ã‹ã‚‚çŸ¥ã‚Œãªã„ã®ã§ã€‚ ä½•ã‚’ã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‹ã€ã¨ã„ãˆã°ã€ä»¥ä¸‹ã‚’è¦‹ã‚Œã°ä¸€ç›®çžç„¶ã§ã—ã‚‡ã†ã€‚ Regexp::Assem ble - Assem ble multiple Regular Expressions into a single RE - search.cpan.org use Regexp::Asse
swat 2009/03/17
dankogai

cpan

*perl

*programming

regex

*tips
ãƒªãƒ³ã‚¯
ä»Šæ—¥ã®CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ï¼ˆè·¡åœ°ï¼‰ ç›®æ¬¡
Redirectingâ€¦ Click here if you are not redirected.
swat 2009/02/26
*perl

cpan

*dev

*programming

module
ãƒªãƒ³ã‚¯
Strawberry Perl for Windows
Perl is a programming language suitable for writing simple scripts as well as complex applications â€” see https://www.perl.org. Strawberry Perl is a perl environment for MS Windows containing all you need to run and develop perl applications. It is designed to be as close as possible to perl environment on UNIX systems. It includes perl binaries, compiler (gcc) + related tools, all the external lib
swat 2009/01/08
*perl

*programming

*tools

*dev
ãƒªãƒ³ã‚¯
ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®çµ‚äº†æ—¥ã‚’2020å¹´1æœˆ31æ—¥(é‡‘)ã«æ±ºå®šã—ã¾ã—ãŸ - ã¯ã¦ãªã®å‘ŠçŸ¥
ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®çµ‚äº†æ—¥ã‚’2020å¹´1æœˆ31æ—¥(é‡‘)ã«æ±ºå®šã—ã¾ã—ãŸ ä»¥ä¸‹ã®ã‚¨ãƒ³ãƒˆãƒªã®é€šã‚Šã€ä»Šå¹´æœ«ã‚’ç›®å‡¦ã«ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã‚’çµ‚äº†äºˆå®šã§ã‚ã‚‹æ—¨ã‚’ãŠçŸ¥ã‚‰ã›ã—ã¦ãŠã‚Šã¾ã—ãŸã€‚ 2019å¹´æœ«ã‚’ç›®å‡¦ã«ã€ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®æä¾›ã‚’çµ‚äº†ã™ã‚‹äºˆå®šã§ã™ - ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—æ—¥è¨˜ ã“ã®ãŸã³ã€æ£å¼ã«çµ‚äº†æ—¥ã‚’æ±ºå®šã„ãŸã—ã¾ã—ãŸã®ã§ã€ä»¥ä¸‹ã®é€šã‚Šã”ç¢ºèªãã ã•ã„ã€‚ çµ‚äº†æ—¥: 2020å¹´1æœˆ31æ—¥(é‡‘) ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆå¸Œæœ›ç”³è«‹æœŸé™:2020å¹´1æœˆ31æ—¥(é‡‘) çµ‚äº†æ—¥ä»¥é™ã¯ã€ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®é–²è¦§ãŠã‚ˆã³æŠ•ç¨¿ã¯è¡Œãˆã¾ã›ã‚“ã€‚æ—¥è¨˜ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆãŒå¿…è¦ãªæ–¹ã¯ä»¥ä¸‹ã®è¨˜äº‹ã«ã—ãŸãŒã£ã¦æ‰‹ç¶šãã‚’ã—ã¦ãã ã•ã„ã€‚ ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã«æŠ•ç¨¿ã•ã‚ŒãŸæ—¥è¨˜ãƒ‡ãƒ¼ã‚¿ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆã«ã¤ã„ã¦ - ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—æ—¥è¨˜ ã”åˆ©ç”¨ã®ã¿ãªã•ã¾ã«ã¯ã”è¿·æƒ‘ã‚’ãŠã‹ã‘ã„ãŸã—ã¾ã™ãŒã€ã©ã†ãžã‚ˆã‚ã—ããŠé¡˜ã„ã„ãŸã—ã¾ã™ã€‚ 2020-06-25 è¿½è¨˜ ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—æ—¥è¨˜ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆãƒ‡ãƒ¼ã‚¿ã¯2020å¹´2æœˆ28
swat 2008/07/04
*programming

*perl

*tips
ãƒªãƒ³ã‚¯
perl - use warnings; # -w ã§ãªãã¦ : 404 Blog Not Found
2008å¹´06æœˆ19æ—¥21:45 ã‚«ãƒ†ã‚´ãƒªLightweight Languages perl - use warnings; # -w ã§ãªãã¦ æœ€è¿‘ã¯ã€ã•ã™ãŒã«use strict;ã•ã‚Œã¦ã„ãªã„å®Ÿè·µã‚³ãƒ¼ãƒ‰ã‚’ç›®ã«ã™ã‚‹ã“ã¨ã‚‚ã»ã¨ã‚“ã©ãªããªã£ã¦ããŸã®ã ã‘ã©ã€ã¾ã æ®‹ã£ã¦ã„ã‚‹ã®ãŒuse warnings;åˆ©ç”¨ã€‚ä»¥ä¸‹ã¨ä½µã›ã¦èªã‚“ã§ã„ãŸã ã‘ã‚‹ã¨å¹¸ã„ã ã€‚ 404 Blog Not Found:perl - use strict; # and be happy -w ã£ã¦ä½•? warnings ã£ã¦ä½•? ã¾ãšã€ä»¥ä¸‹ã®ãƒ—ãƒã‚°ãƒ©ãƒ ã‚’è¦‹ã¦ã¿ã‚ˆã†ã€‚ #!/usr/local/bin/perl use strict; sub distance { my ( $a, $b ) = @_; return sqrt( $a**2 + $b**2 ); } print distance(@ARGV), "\n"; % p
swat 2008/06/20
dankogai

*perl

*tips
ãƒªãƒ³ã‚¯
ã‚ˆã„ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã‚’ä½œæˆã™ã‚‹ãŸã‚ã®å¿ƒãŒã‘ã€‚â˜…â˜…â˜… - ã‚µãƒ³ãƒ—ãƒ«ã‚³ãƒ¼ãƒ‰ã«ã‚ˆã‚‹ Perl å…¥é–€
Perl â€º ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ â€º here ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ä½œæˆã«é–¢ã™ã‚‹ã‚ãŸã—ã®è€ƒãˆã‚’æ®´ã‚Šæ›¸ãã—ã¾ã—ãŸã€‚ è¦‹å‡ºã— å¼•æ•°ã¨æˆ»ã‚Šå€¤ã«ã¤ã„ã¦ç†è§£ã™ã‚‹ã€‚ å°ã•ãªã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã‚’ä½œæˆã™ã‚‹ã€‚ ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã«æŸ”è»Ÿæ€§ã‚’æŒãŸã›ã‚‹ã€‚ å‘¼ã³å‡ºã—ã®éšŽå±¤ã‚’æµ…ãä¿ã¤ã€‚ æ©Ÿèƒ½ã‚’å®Ÿç¾ã™ã‚‹ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã‚’ä½œæˆã™ã‚‹ã€‚ ãƒ¦ãƒ¼ã‚¶ãƒ¼ã‚’æ„è˜ã™ã‚‹ã€‚ å°†æ¥ã‚’æ¥½ã«ã™ã‚‹ã“ã¨ã‚’è€ƒãˆã‚‹ã€‚ å®Œå…¨ãªæŠ½è±¡åŒ–ã¯æ±‚ã‚ãªã„ã€‚ 1. å¼•æ•°ã¨æˆ»ã‚Šå€¤ã«ã¤ã„ã¦ç†è§£ã™ã‚‹ ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã‚’ç†è§£ã™ã‚‹ãŸã‚ã«ã¯ã€å¼•æ•°ã®å—ã‘å–ã‚Šæ–¹ã¨ã€æˆ»ã‚Šå€¤ã®è¿”å´ã®ã—æ–¹ã‚’è¦šãˆã‚Œã°ååˆ†ã§ã™ã€‚ãªãœãªã‚‰ã€å¼•æ•°ã‚’å—ã‘å–ã£ã¦ã‹ã‚‰ã€æˆ»ã‚Šå€¤ã‚’è¿”å´ã‚’ã™ã‚‹ã¾ã§ã¯ã€ä»Šã¾ã§å¦ç¿’ã—ãŸãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°ã¨ãªã‚“ã‚‰å¤‰ã‚ã‚‹ã“ã¨ãŒãªã„ã‹ã‚‰ã§ã™ã€‚å¼•æ•°ã¨æˆ»ã‚Šå€¤ã®æ‰±ã„ã‚’ã€è¦šãˆãŸã‚‰ã€ã™ãã«å®Ÿè·µã«ç§»ã‚Šã¾ã—ã‚‡ã†ã€‚ ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ä½œæˆã§ã€é›£ã—ã„ã®ã¯ã€ä»¥ä¸‹ã®4ç‚¹ã§ã™ã€‚ ä½•ã‚’ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã«ã™ã‚‹ã‹ ã©ã®ã‚ˆã†ãªåå‰ã‚’ã¤ã‘ã‚‹ã‹ å¼•æ•°ã‚’ä½•ã«ã™ã‚‹ã‹ æˆ»ã‚Šå€¤ã‚’ä½•ã«ã™ã‚‹ã‹ æ£
swat 2008/06/17
*perl

*programming

*tips
ãƒªãƒ³ã‚¯
ç¬¬1å›žã€€Perlã®æ–‡æ³•ã®åŸºæœ¬
Perlã¨ã¯ä½•ã‹ Perlã¯ãƒ†ã‚ã‚¹ãƒˆå‡¦ç†ã«ç‰¹ã«å„ªã‚ŒãŸéžå¸¸ã«å¼·åŠ›ãªãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°è¨€èªžã§ã™ã€‚ã§ã‚‚ï¼Œã†ã¾ãä½¿ãˆã°ã‚·ã‚¹ãƒ†ãƒ ã‚’ãã‚Œã„ã«æŽƒé™¤ã•ã›ã‚‹ã“ã¨ã‚‚ã§ãã¾ã™ã—ï¼Œã•ã‚‰ã«ã‚ãªãŸã®å¿ƒã‚‚ã„ã‚„ã—ã¦ãã‚Œã‚‹ã«é•ã„ã‚ã‚Šã¾ã›ã‚“ã€‚ã¾ãŸï¼Œå¤šãã®ãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ãƒ¥ãƒ¼ã‚·ãƒ§ãƒ³ã§æ¨™æº–çš„ã«ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œã¦ã„ã¾ã™ã—ï¼Œè‡ªåˆ†ã§ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã™ã‚‹ã“ã¨ã‚‚é›£ã—ãã¯ã‚ã‚Šã¾ã›ã‚“ã€‚ ã€ŒPerlã£ã¦CGIã˜ã‚ƒãªã„ã®ï¼Ÿã€ã¨æ€ã†æ–¹ãŒã„ã‚‹ã‹ã‚‚çŸ¥ã‚Œã¾ã›ã‚“ã€‚ç¢ºã‹ã«ï¼ŒCGIã§åˆ©ç”¨ã™ã‚‹ãŸã‚ã«Perlã«å‡ºä¼šã£ãŸäººã¯å¤šã„ã§ã—ã‚‡ã†ã€‚ä¸»ãªåˆ©ç”¨æ–¹æ³•ã¨ã„ãˆã°ï¼ŒWebã‚¢ãƒ—ãƒªã‚±ãƒ¼ã‚·ãƒ§ãƒ³ã®ä½œæˆã‹ã‚‚ã—ã‚Œã¾ã›ã‚“ã€‚ã—ã‹ã—ï¼Œã€Œãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°Perlã€ï¼Š1ã«ã‚ˆã‚Œã°ï¼ŒPerlã¯æœ€åˆï¼Œã‚·ã‚¹ãƒ†ãƒ ç®¡ç†ã®ãŸã‚ã®ãƒ„ãƒ¼ãƒ«ã¨ã—ã¦ä½œã‚‰ã‚ŒãŸã‚‚ã®ã ã£ãŸã®ã§ã™ã€‚ Fedoraãªã©ã®Linuxãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ãƒ¥ãƒ¼ã‚·ãƒ§ãƒ³ã§ã¯å°Žå…¥æ™‚ã«é–‹ç™ºç’°å¢ƒã‚’é¸ã¶ã¨PerlãŒã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œã¾ã™ã€‚åŒæ™‚ã«Perlã®ãƒ‰ã‚ãƒ¥ãƒ¡ãƒ³ãƒˆã‚‚ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œ
swat 2008/06/03
*perl

*programming

*ã‚ã¨ã§èªã‚€

*tips
ãƒªãƒ³ã‚¯
ã‚µãƒ³ãƒ—ãƒ«ã‚³ãƒ¼ãƒ‰ã«ã‚ˆã‚‹Perlå…¥é–€
æ–‡å—åˆ—ã€€æ•°å€¤ã‚’ASCII(ã‚¢ã‚¹ã‚ãƒ¼)ã‚³ãƒ¼ãƒ‰ã«å¯¾å¿œã™ã‚‹æ–‡å—ã«å¤‰æ›ã™ã‚‹ã«ã¯ã€chré–¢æ•°ã‚’ä½¿ç”¨ã—ã¾ã™ã€‚ #!/usr/bin/perl use strict; use warnings; # ASCIIæ–‡å—ã‚³ãƒ¼ãƒ‰ã§ã¯65,66,67ã¯ãã‚Œãžã‚Œ 'A','B','C'ã«å¯¾å¿œã™ã‚‹ã€‚ my $a_num = 65; my $b_num = 66; my $c_num = 67; print chr( $a_num ), "\n"; print chr( $b_num ), "\n"; print chr( $c_num ), "\n"; __END__ ç¶šãã‚’èªã‚€
swat 2008/04/24
*perl

*ã¾ã¨ã‚
ãƒªãƒ³ã‚¯
1