| ½© ::º£À̽º Shell :: Base´Â ¶óÀÎ ÁöÇâ ¸í·É Å뿪»ç¸¦ ¸¸µå´Â ÀÏ¹Ý Å¬·¡½ºÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
½© ::º£À̽º ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Darren Chamberlain
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~darren/Tie-Google-0.03/Google.pm
½© ::º£À̽º ű×
½© ::º£À̽º ¼³¸í
Shell :: Base´Â ¶óÀÎ ÁöÇâ ¸í·É Å뿪»ç¸¦ ¸¸µå´Â ÀÏ¹Ý Å¬·¡½ºÀÔ´Ï´Ù. Shell :: Base´Â Line-Oriented Command Interprither¸¦ ±¸ÃàÇÏ´Â ÀÏ¹Ý Å¬·¡½ºÀÔ´Ï´Ù. Synopsis ÆÐÅ°Áö My :: Shell; Shell :: Base; ±âº» QW (Shell :: Base)¸¦ »ç¿ëÇϽʽÿÀ. SUB DO_GREETING {Hello! " } Shell :: Base´Â ¸í·É ÁÙ ÇÁ·Î±×·¥À» ºôµåÇϱâ À§ÇØ ¼³°èµÈ ±âº» Ŭ·¡½ºÀÔ´Ï´Ù. ÀÌ°ÍÀº ¿©·¯ À¯¿ëÇÑ ±âº»°ªÀ» Á¤ÀÇÇÏ°í ¸í·ÉÀ» Ãß°¡ÇÏ°í µµ¿ò¸»À» ´Ü¼øÈÇÏ°í Term :: ReadLine.After PerlÀÇ ¿©·¯ rep (Àбâ - evel-print) ·çÇÁ¸¦ ÀÛ¼ºÇÏ´Â °Í°ú Àß ÅëÇյ˴ϴÙ. Æ÷ÇÔ : (1) {MY $ LINE =; $ LINEÀ» Á¤ÀÇÇÏÁö ¾Ê´Â ÇÑ ¸¶Áö¸·; Chomp $ line; if ($ line = ~ / ^ ... ¿ä±¸ »çÇ× : ¡¤ Perl.
½© ::º£À̽º °ü·Ã ¼ÒÇÁÆ®¿þ¾î