| CGI :: ÀÀ¿ë ÇÁ·Î±×·¥ :: Ç÷¯±×ÀÎ :: LinkInteRity. CGI :: Application :: Plugin :: LinkIntegrity´Â CGI :: ÀÀ¿ë ÇÁ·Î±×·¥¿¡¼ ÅÆÆÛ - Resisistent ¸µÅ©¸¦ ¸¸µé ¼ö ÀÖ½À´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
CGI :: ÀÀ¿ë ÇÁ·Î±×·¥ :: Ç÷¯±×ÀÎ :: LinkInteRity. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Michael Graham
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~mgraham/Test-FormValidator-0.06/lib/Test/FormValidator.pm
CGI :: ÀÀ¿ë ÇÁ·Î±×·¥ :: Ç÷¯±×ÀÎ :: LinkInteRity. ű×
CGI :: ÀÀ¿ë ÇÁ·Î±×·¥ :: Ç÷¯±×ÀÎ :: LinkInteRity. ¼³¸í
CGI :: Application :: PlugIn :: LinkIntegrity´Â CGI :: ½Åû¼¿¡¼ ÅÆÆÛ - ·¹Áö½ºÅÍ ¸µÅ©¸¦ ¸¸µé ¼ö ÀÖ½À´Ï´Ù. CGI :: Application :: PlugIn :: LinkIntegratiTy´Â CGI :: Application¿¡¼ ÅÆÆÛ - Resisistent ¸µÅ©¸¦ ¸¸µé ¼ö ÀÖ½À´Ï´Ù. ÀÀ¿ë ÇÁ·Î±×·¥ : ±âº» 'CGI :: Application'À» »ç¿ëÇϽʽÿÀ. CGI :: Application :: Plugin :: LinkIteRity; ÇÏÀ§ ¼³Á¤ {³» $ self = shift; $ self-> link_integrity_config (ºñ¹Ð => '´ç½Å°ú ³ª¿¡°Ô¸¸ ¾Ë·ÁÁø ºñ¹Ð ¹®ÀÚ¿',); } sub Account_info {My $ self = shift; MY $ Account_id = get_user_account_id (); MY $ TEMPLOW = $ SELF-> LOAD_TMPL ( 'Account.html'); $ template-> param ( 'balance'=> $ self-> ¸µÅ© ( "/ account.cgi? rm = balanceacct_id = $ Account_id"); 'Àü¼Û'=> $ self-> ¸µÅ© ( "/ account.cgi? rm = transferacct_id = $ Account_id "); 'ÀÎÃâ'=> $ self-> ¸µÅ© ("/ account.cgi? rm = withDrawlacct_id = $ Account_id ");); } ÅÛÇø´¿¡¼ :
µ¿ÀÛ :
"> ±ÕÇü Ç¥½Ã
Àü¼Û
"> Çö±ÝÀ» ¾òÀ¸½Ê½Ã¿À ÀÌ°ÍÀº ºê¶ó¿ìÀú¿¡ ´ÙÀ½ HTMLÀ» º¸³À´Ï´Ù. µ¿ÀÛ :
Àü¼Û ¸¸µé±â
Çö±Ý ¾ò±â a, »ý¼º µÈ URLÀº ÀÌÁ¦ ÀÛ¼ºµÈ URLÀÌ ÀÌÁ¦ ¹æ»çÇüÀÔ´Ï´Ù. »ç¿ëÀÚ°¡ ACCT_ID¸¦ 73¿¡¼ 74·Î º¯°æÇϸé _CHECKSUMÀÌ ÀÏÄ¡ÇÏÁö ¾ÊÀ¸¸ç ½Ã½ºÅÛÀÌÀ̸¦ ħÀÔ ½Ãµµ·Î ó¸®ÇÕ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
CGI :: ÀÀ¿ë ÇÁ·Î±×·¥ :: Ç÷¯±×ÀÎ :: LinkInteRity. °ü·Ã ¼ÒÇÁÆ®¿þ¾î