Spops :: ¿¹¿ÜSPOPSÀÇ ¿¹¿Ü¸¦À§ÇÑ ±âº» Ŭ·¡½º | |
Áö±Ý ´Ù¿î·Îµå |
Spops :: ¿¹¿Ü ¼øÀ§ ¹× ¿ä¾à
±¤°í
- ƯÇã:
- Perl Artistic License
- °¡°Ý:
- FREE
- °Ô½ÃÀÚ À̸§:
- Chris Winters
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~cwinters/SPOPS-0.87/SPOPS/SQLInterface.pm
Spops :: ¿¹¿Ü ű×
Spops :: ¿¹¿Ü ¼³¸í
¼Ö±âÀÇ ¿¹¿Ü¸¦À§ÇÑ ±âº» Ŭ·¡½º SPOPS :: ¿¹¿Ü´Â spops.synopsis #¿¡¼ ¿¹¿Ü¸¦À§ÇÑ Perl Ŭ·¡½ºÀÔ´Ï´Ù. »ç¿ëÀÚ°¡ Spops :: Exception; eval {$ »ç¿ëÀÚ -> ÀúÀå}; if ($ @) {print "¿À·ù : $ @", ½ºÅà ÃßÀû : ", $ @ -> trace-> as_string" ";} # ½ºÅÃÀÌ ¸¶Áö¸·À¸·Î @Errors = Spops :: Exception-> get_stack;"¿À·ù¸¦ ÀμâÇÏ´Â ¿À·ù°¡ ÀÖ½À´Ï´Ù. "; @ @Errors (@Errors) {print"¿À·ù : ", $ e-> ¸Þ½ÃÁö" ";} # °³¹ßÀÚ·Î »ç¿ëµÇ´Â SPOPS :: ¿¹¿Ü; MY $ RV = eval {$ DBH-> DO ($ sQL)}; if ($ @) {spops :: Exception-> ´øÁö±â ($ @); ¹Ù·Î °¡±â »ç¿ë ÁöÁ¡ :: ¿¹¿Ü QW (spops_error); My $ rv = eval {$ d do ($ sql)}; spops_error ($ @) if ($ @); # ¼ºê Ŭ·¡½º°¡ Spops¸¦ »ç¿ëÇÏ´Â ¿¹¿Ü¸¦ ´øÁý´Ï´Ù :: Ãß°¡ # Çʵ尡ÀÖ´Â ¿¹¿Ü ÀÎ °æ¿ì $ RV = eval {$ DBH-> DO ($ SQL)}; if ($ @) {SPOPS :: exception :: dbi-> throw ($ @, {sql => $ sql, ¾×¼Ç => 'do'});} # ´õ ±ä ¸Þ½ÃÁö¿Í ¸Å°³ º¯¼ö°¡ÀÖ´Â ¿¹¿Ü¸¦ ´øÁö½Ê½Ã¿À :: ¿¹¿Ü -> ´øÁö±â ( "ÀÌ°ÍÀº ¸Å¿ì ¸Å¿ì ¸Å¿ì ¸Å¿ì"¸Å¿ì ±ä ¸Þ½ÃÁö, " ³Ê¹« ¸¹ÀÌ ¸»ÇÏ°í ÀÖ½À´Ï´Ù. ", {action => 'blah'}); # ¿¹¿Ü¸¦ ÀâÀ¸½Ê½Ã¿À. ±×·± ´ÙÀ½ ¸î °¡Áö Á¤¸®¸¦ ¼öÇà ÇÑ ´ÙÀ½ ³» $ rv = eval {$ object-> magity_spops_operation}; ($ @) {³» $ ¿¹¿Ü = $ @; close_this_resource (); close_that_resource (); house_that_resource ($ ¿¹¿Ü);}ÀÌ Å¬·¡½º´Â SpopsÀÇ ¸ðµç ¿¹¿ÜÀÇ ±âº»ÀÔ´Ï´Ù. ¿¹¿Ü´Â ÀϹÝÀûÀ¸·Î ÀÏÁ¾ÀÇ ¿À·ù »óÅ Rath¸¦ ³ªÅ¸³»´Â µ¥ »ç¿ëµË´Ï´Ù. Á¤»óÀûÀ¸·Î ¹ß»ýÇÒ ¼öÀÖ´Â »óȲº¸´Ù. ¿¹¸¦ µé¾î, µ¥ÀÌÅÍ ÀúÀå¼Ò°¡ ¾Æ´Ñ ·¹Äڵ带 °¡Á® ¿À·Á°íÇÏ´Â °æ¿ì ¿¹¿Ü¸¦ throwÇÏÁö ¾Ê½À´Ï´Ù. ±×·¯³ª µ¥ÀÌÅͺ£À̽º ½ºÅ°¸¶°¡ º¯°æ µÇ¾ú±â ¶§¹®¿¡ Äõ¸®°¡ ½ÇÆÐÇÏ°í Á¦°Å µÈ fields.This ¸ðµâÀÌ ÂüÁ¶ÇÏ´Â SQL ¹®ÀÌ Spops :: Error¿Í »ç¿ë µÈ ¿À·ù 󸮸¦ ´Ù½Ã ÇÑ ¹ø Äõ¸®¿¡ ½ÇÆÐÇÏ¸é ¿¹¿Ü¸¦ throwÇÕ´Ï´Ù. º¯¼ö°¡ Spops :: Error¿¡¼ ¼³Á¤µÇµµ·ÏÇϱ⠶§¹®¿¡ µÚ·Î ȣȯ ±â´ÉÀÌ ÀÖ½À´Ï´Ù. ±×·¯³ª ÀÌ°ÍÀº ¿µ±¸ÀûÀÌÁö ¾Ê½À´Ï´Ù. À̸¦ »ç¿ëÇÏ´Â °æ¿ì Äڵ带 ÃÖ´ëÇÑ ¼öÁ¤ÇؾßÇÕ´Ï´Ù. ¿øÇÏ´Â °æ¿ì ¿¹¿ÜÀÇ »õ·Î¿î Ŭ·¡½º¸¦ ½±°Ô ¸¸µé ¼ö ÀÖ½À´Ï´Ù. ¾Æ·¡ÀÇ ÇÏÀ§ Ŭ·¡½º¸¦ ÂüÁ¶ÇϽʽÿÀ. ¿ä±¸ »çÇ× : ¡¤ Perl.
Spops :: ¿¹¿Ü °ü·Ã ¼ÒÇÁÆ®¿þ¾î