| »ÏÁ·ÇÑ SPOPS´Â º¸¾È Perl ¸ðµâÀÌÀÖ´Â °£´ÜÇÑ Perl °´Ã¼ Áö¼Ó¼ºÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
»ÏÁ·ÇÑ ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Chris Winters
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~cwinters/SPOPS-0.87/SPOPS/SQLInterface.pm
»ÏÁ·ÇÑ Å±×
»ÏÁ·ÇÑ ¼³¸í
Spops´Â Security Perl ¸ðµâÀÌÀÖ´Â °£´ÜÇÑ Perl °´Ã¼ Áö¼Ó¼ºÀÔ´Ï´Ù. Spops´Â º¸¾È Perl ModuleÀÌÀÖ´Â °£´ÜÇÑ Perl °´Ã¼ Áö¼Ó¼ºÀÔ´Ï´Ù. Synopsis # ±¸¼º ÆÄÀÏ¿¡¼ ¿ÀºêÁ§Æ®¸¦ ¿ÏÀüÈ÷ Á¤ÀÇÇϽʽÿÀ. My $ spops = {myObject => {class => 'myspops :: object', isa => qw (spops :: dbi) ), ...}}; # ±¸¼ºÀ» ó¸®ÇÏ°í Ŭ·¡½º SPOPS :: Initialize-> ÇÁ·Î¼¼½º ({config => $ spops}); # °´Ã¼ ¸¸µé±â My $ object = myspops :: object-> new; # ÀϺΠ¸Å°³ º¯¼ö¸¦ ¼³Á¤ $ °³Ã¼ -> {$ param1} = $ value1; $ °´Ã¼ -> {$ param2} = $ value2; # »ó¼Ó µÈ Áö¼Ó¼º ¸ÞÄ¿´ÏÁò eval {$ °³Ã¼ -> ÀúÀå}¿¡ °³Ã¼¸¦ ÀúÀåÇÕ´Ï´Ù. °´Ã¼ : $ @ n ","½ºÅà ÃßÀû : ", $ @ -> ÃßÀû -> as_string,"n "À» ÀúÀåÇÏ·Á´Â °æ¿ì ($ @ n"¿À·ù°¡ ¹ß»ýÇÕ´Ï´Ù. } ¿ä±¸ »çÇ× : ¡¤ Perl.
»ÏÁ·ÇÑ °ü·Ã ¼ÒÇÁÆ®¿þ¾î