|
|
ÇöÀçÀ§Ä¡: ¸ÞÀÎ ÇØÇÇÆ÷·³ Ȳ±Ý : °Ô½Ã¹° Àбâ |
|
|
  2002-06-03 (17:01:03) from 61.104.186.190 |
|
|
  ÀÛ¼ºÀÎ : HappyCGI |
Á¶È¸¼ö : 1531    |
|
Á¦¸ñ : Á¤±Ô½Ä »ç¿ë½Ã ½ÇÁ¦ ÀÏÄ¡µÈ ºÎºÐ º¸±â |
Á¤±Ô½Ä »ç¿ë½Ã ½ÇÁ¦ ÀÏÄ¡µÈ ºÎºÐÀÌ ¾î¶² ³»¿ëÀÎÁö ¾Ë°í ½ÍÀ» °æ¿ì°¡ ÀÖ½À´Ï´Ù. ƯÈ÷ µð¹ö±ëÀ» ÇÒ ¶§°¡ ´õ¿í ±×·¸½À´Ï´Ù. ÀÌ ¶§ »ç¿ëÇÏ´Â °ÍÀÌ $`, $&, $' Ư¼öº¯¼öÀÔ´Ï´Ù.
[ÇÁ·Î±×·¥ÄÚµå]
$var = 'wana banana?';
if( $var =~ /b?a(na)+/ ) {
print "¾ß ! ¹Ù³ª³ª´Ù !!\n";
} |
À§¿Í °°Àº Äڵ忡¼ ½ÇÁ¦ ÀÏÄ¡µÈ ºÎºÐÀ» Ãâ·Â ÇÏ·Á¸é print "$&\n";ÇÏ¸é µË´Ï´Ù. Á»´õ ¸íÈ®È÷ Çϱâ À§Çؼ ÀÏÄ¡µÈ ºÎºÐÀÇ ¾ÕºÎºÐÀ» ³ªÅ¸³»´Â $`¿Í ÀÏÄ¡µÈ ºÎºÐÀÇ µÞºÎºÐÀ» ³ªÅ¸³»´Â $'¸¦ °°ÀÌ Ãâ·ÂÇØ º¸¸é ´õ¿í ¸íÈ®ÇÒ °ÍÀÔ´Ï´Ù.
[ÇÁ·Î±×·¥ÄÚµå]
$var = 'wana banana?';
if( $var =~ /b?a(na)+/ ) {
print "¾ß ! ¹Ù³ª³ª´Ù !!\n";
print "¾ÕÂÊ: $`\n",
"ÀÏÄ¡: $&\n",
"µÞÂÊ: $'\n";
} |
ÀÌ ÇÁ·Î±×·¥À» ½ÇÇàÇÏ¿© Ãâ·ÂµÈ ³»¿ëÀº ´ÙÀ½°ú °°½À´Ï´Ù.
¾ß ! ¹Ù³ª³ª´Ù !!
¾ÕÂÊ: w
ÀÏÄ¡: ana
µÞÂÊ: banana?
¿¹»óÇÑ °Í°ú ÀÏÄ¡ÇÏ¿´½À´Ï±î ?
À̱ÛÀº http://www.perl.or.kr/tips/whatmatched.html ¿¡¼
¹ßÃéµÈ ³»¿ëÀÔ´Ï´Ù.
HappyCGI's SIGN
| °³¹ßÀÚÀÇ ¹Ì´öÀº
°ÔÀ¸¸§(Laziness) ÂüÁö¸»±â(Impatience) ±³¸¸(Hubris) |
|
|
|
¸Þ¸ð |
|
³²°ÜÁø ¸Þ¸ð°¡ ¾ø½À´Ï´Ù.
|
|
   |
  |
|
¨Ô |
Á¦¸ñ |
ÀÛ¼ºÀÎ |
Á¶È¸ |
µî·ÏÀÏ |
|
|
Á¤±Ô½Ä »ç¿ë½Ã ½ÇÁ¦ ÀÏÄ¡µÈ ºÎºÐ º¸±â |
HappyCGI |
1532 |
2002-06-03 |
|
  |
|
|