| SQL :: YASP. SQL :: YASP´Â SQL Æļ ¹× Æò°¡ÀÚÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
SQL :: YASP. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Miko O'Sullivan
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~miko/
SQL :: YASP. ű×
SQL :: YASP. ¼³¸í
SQL :: YASP´Â SQL Æļ ¹× Æò°¡ÀÚÀÔ´Ï´Ù. SQL :: YASP´Â SQL Æļ ¹× Æò°¡ÀÚÀÔ´Ï´Ù. SYNOPSIS »ç¿ë SQL :: YASP; MY ($ SQL, $ stmt, $ dbrec, $ params); $ SQL = 'Joe', last => 'smith', À̸ÞÀÏ => 'joe@idocs.com', ¼øÀ§ => 10,}; # ÀÔ·Â ¸Å°³ º¯¼ö $ params = ; #ÀÌ ·¹Äڵ尡 WHERE ÀýÀ» Àü´ÞÇϸé ($ stmt -> { '¿©±â¼'} -> evalexpr (db_record => $ dbrec, params => $ params)) {# ¼±Åà »çÇ× Á¶Ç׿¡ Ç¥½ÃµÈ´ë·Î ·¹ÄÚµå °¡Á® ¿À±â retrec = $ stmt-> select_fields (db_record => $ dbrec); $ Retrec -> { 'FullName'}, "N"À» ÀμâÇϽʽÿÀ. } ¿ä±¸ »çÇ× : ¡¤ Perl.
SQL :: YASP. °ü·Ã ¼ÒÇÁÆ®¿þ¾î