perl - @_ ã¯å‚ç…§ã§ã‚ã‚‹ : 404 Blog Not Found2008å¹´05月12æ—¥18:15 カテゴリLightweight Languages perl - @_ ã¯å‚ç…§ã§ã‚ã‚‹ ã“ã‚Œã§ã‚‚æ£è§£ã§ã¯ã‚ã‚Šã¾ã™ãŒã€perlã®å ´åˆã‚‚ã£ã¨ç°¡å˜ãªæ–¹æ³•ãŒã‚ã‚Šã¾ã™ã€‚ å„言語間ã®å‚ç…§ã¨å€¤æ¸¡ã— - @author pyridoxin sub swap { my ($x , $y) = @_; $$temp = $$y; $$y = $$x; $$x = $$temp } [codepad] sub swap { my $tmp = $_[0]; $_[0] = $_[1]; $_[1] = $tmp; } my ($a, $b) = (1, 2); print "\$a = $a, \$b = $b\n"; swap($a, $b); print "\$a = $a, \$b = $b\n"; ã“ã‚Œã¯ã€ReferenceãŒå˜åœ¨ã—ãªã‹ã£ãŸPerl 4以å‰ã‹ã‚‰ã®ä»•æ§˜ã§ã™ã€‚
antcallã‚„antã§ãƒ—ãƒãƒ‘ティをã¾ã¨ã‚ã¦æŒ‡å®šã™ã‚‹
ãƒ‡ãƒ¼ã‚¿æ§‹é€ ã¯ã‚¯ãƒ©ã‚¹ã«ä»»ã›ãŸï¼ã ã‹ã‚‰ã€ã‚¢ãƒ«ã‚´ãƒªã‚ºãƒ ã¯static関数ã§æ›¸ããœï¼ï¼ï¼ˆã‚リッ - ã¿ãã“ã‚
サービス終了ã®ãŠçŸ¥ã‚‰ã›
MySQL講座 +++[smart]
{{#tags}}- {{label}}
{{/tags}}