°¨»ç :: DBI.

ÄÚµåÀÇ µ¥ÀÌÅÍ º¯°æ ¹× °Ë»ö °¡´ÉÇÑ ·Î±× ·¹Äڵ带 µ¥ÀÌÅͺ£À̽º¿¡ ÀúÀåÇÕ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

°¨»ç :: DBI. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Guillaume Aubert
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~aubertg/

°¨»ç :: DBI. ű×


°¨»ç :: DBI. ¼³¸í

Audit :: DBI´Â Äڵ忡¼­ °¨»ç µ¥ÀÌÅ͸¦ º¯°æÇÏ°í µ¥ÀÌÅͺ£À̽º¿¡ °Ë»ö °¡´ÉÇÑ ·Î±× ·¹Äڵ带 ÀúÀåÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù .Synopsis Audit :: DBI¸¦ »ç¿ëÇϽʽÿÀ. # °¨»ç °³Ã¼¸¦ ¸¸µì´Ï´Ù. $ AUDIT = AUDIT :: DBI-> NEW (database_handle => $ dbh,); # ÇÊ¿äÇÑ Å×À̺íÀ» ¸¸µì´Ï´Ù. $ AUDIT-> create_tables (); # °¨»ç À̺¥Æ®¸¦ ³ìÈ­ÇϽʽÿÀ. $ AUDIT-> RECORD (event => $ À̺¥Æ®, $ subject_type, subject_id => $ subject_id, event_time => $ event_time, diff => $ old_structure, $ new_structure], search_data => \ % search_data, Á¤º¸ = > \ % Á¤º¸, infered_account_id => $ Account_id, file => $ file, line => $ line,); # °¨»ç À̺¥Æ® °Ë»ö. MY $ AUDIT_EVENTS = $ AUDIT-> °ËÅä (); Á¦Ç°ÀÇ È¨ÆäÀÌÁö


°¨»ç :: DBI. °ü·Ã ¼ÒÇÁÆ®¿þ¾î