¾ÆÀ̵ð ºñ¹Ð¹øÈ£ | ȸ¿ø°¡ÀÔ | ºñ¹Ð¹øÈ£ºÐ½Ç
   
¡¡»õ·Î¿î¼Ò½Ä
¡¡FAQ
¡¡À¥ÇÁ·Î±×·¥
¡¡À¥DB
¡¡À¥¼­¹ö
¡¡À¥ÇÁ·Î±×·¥¼öÁ¤
¡¡ÇØÇÇÄ®·³
¡¡°ñµåÆÁ
 
Á¦ÀÛÀÇ·Ú
À¥ÇÁ·Î±×·¥ ÆǸŸô
 
ÇöÀçÀ§Ä¡: ¸ÞÀÎ ÇØÇÇÆ÷·³ Ȳ±Ý : °Ô½Ã¹° Àбâ
  2003-08-27 (20:21:48) from 211.229.81.203
  ÀÛ¼ºÀÎ : HappyCGI Á¶È¸¼ö : 2062   
Á¦¸ñ : [PERL ÆÁ] ·£´ý¹®ÀÚ¸¦ »ý¼ºÇ쵂 ÀÔ·ÂÇϱ⠽±°Ô ¸¸µé±â

ÇØÇÇCGI ÀÔ´Ï´Ù.

±×°£ Æ÷·³À» ¹«½ÉÇÏ°Ô º¸°í Áö³Â±º¿ä.  

Â÷Â÷ ÁÁÀº ÀÚ·á·Î ´Ù½Ã ä¿ö³ª°¡µµ·Ï ÇÏ°Ú½À´Ï´Ù.


°¡²û·£´ýÀ¸·Î ¹®ÀÚ¸¦ ¸¸µé ÇÊ¿ä°¡ ÀÖÀ»¶§°¡ ÀÖ½À´Ï´Ù.

ÀÌ °æ¿ì ·£´ý¹®ÀÚ°¡ ³Ê¹« Ä¡±â ¾î·Æ°Ô ¸¸µé¾îÁö´Â °æ¿ì°¡ ÀÖÁÒ?   jlkiowkh ó·³ ¸»ÀÌÁÒ.

¾Æ·¡ Äڵ带 ¾²¸é ÀÚÀ½°ú ¸ðÀ½ÀÌ ¼¯¿© Ä¡±â ½±°Ô »ý¼ºÇϽǼö ÀÖ½À´Ï´Ù.

[ÇÁ·Î±×·¥ÄÚµå]

#!/usr/bin/perl

my @array = qw(b c d e f g h i j k l m n p r s t x z);
srand(time ^ $$);
@array = sort { return (int(rand(3)) - 1); } @array;

my @array2 = qw(a e i o u y);
srand(time ^ $$);
@array2 = sort { return (int(rand(3)) - 1); } @array2;

print "content-type:text/html\n\n";
print qq~$array[0]$array2[0]$array[1]$array2[1]$array[2]$array2[2]~;

À§ ÄÚµå´Â http://perlmania.or.kr ¿¡¼­ º¸°í ¾à°£ ÀÀ¿ëÇغ»°ÍÀÔ´Ï´Ù.

ÁÁÀº ÇÏ·çµÇ¼¼¿ä.

 




HappyCGI's SIGN
°³¹ßÀÚÀÇ ¹Ì´öÀº

°ÔÀ¸¸§(Laziness)
ÂüÁö¸»±â(Impatience)
±³¸¸(Hubris)


   ¸Þ¸ð

³²°ÜÁø ¸Þ¸ð°¡ ¾ø½À´Ï´Ù.

:³×¸Â¾Æ¿ä: :È­³ª´Â±º¿ä: :Àá¿Í: :¿ì¿ïÇØ: :À̰ǾƳÄ: :¿ÕÇÏÇÏ: ¿Õ¿ôÀ½~ ³î·¥~

  

 
¨Ô
Á¦¸ñ
ÀÛ¼ºÀÎ
Á¶È¸
µî·ÏÀÏ
[PERL ÆÁ] ·£´ý¹®ÀÚ¸¦ »ý¼ºÇ쵂 ÀÔ·ÂÇϱ⠽±°Ô ¸¸µé±â
HappyCGI
2063
2003-08-27
 



  HOME | ȸ»ç¼Ò°³ | Á¦ÀÛÀÇ·Ú | °³ÀÎÁ¤º¸Ãë±Þ¹æħ | CGIMALL | ÀÚ·á½Ç | »çÀÌÆ®µî·Ï | ·©Å·100 | Æ÷·³ | Ãʺ¸°¡À̵å | Áú¹®°ú´äº¯ | ¹è³Ê±¤°í
Copyright¨Ï1997~2008 HappyCGI All rights reserved
Powered By HappyCGI