달걀 :: mod :: EasyDBI. EGG :: MOD :: EasyDBI는 DBI 모듈이 쉽게 사용할 수 있습니다.
지금 다운로드

달걀 :: mod :: EasyDBI. 순위 및 요약

달걀 :: mod :: EasyDBI. 태그

Perl 모듈 등급 계란 제작자 DBI 모듈 계란 수업

달걀 :: mod :: EasyDBI. 설명

Egg :: Mod :: EasyDBI는 쉽게 사용할 수있는 DBI 모듈입니다. EGG :: MOD :: EasyDBI는 DBI 모듈을 쉽게 사용할 수 있습니다. 식 노프가 EGG :: MOD :: EasyDBI {debug => 1, trace => 1, upgrade_ok => 1, clear_ok => 1, alias => jok => 1) => 'member_management_master', ...}, sql_abstract => {logic => 'and', ......},}; DBI를 사용하십시오. MY $ dbh = dbi-> connect (......); MY $ ES = EGL :: MOD :: EASYDBI-> NEW ($ dbh); $ ed-> 추적 (1); MY $ DB = $ ES-> DB; 내 $ 회원 = $ DB-> 회원; # 멤버에서 선택하십시오. 여기서 id =? MY $ HOGE = $ 회원 -> 해시 ( 'ID =?', $ ID) || DIE Q {데이터를 찾을 수 없습니다. }; # 멤버에서 * Select * Select>? 내 $ list = $ 회원 -> ArrayRef ( '나이>?', 20) || DIE Q {데이터를 찾을 수 없습니다. }; # 멤버에서 ID를 선택하십시오. 여기서 사용자 =? $ ID = $ 회원 -> 스칼라 ( 'ID', '사용자 =' ','boo ') || DIE Q {데이터를 찾을 수 없습니다. }; # 처리 된 목록이 획득됩니다. 내 $ list = $ members-> arrayref ( 'AGE>?', , 하위 ($ hARARY, % hash) = @_; $ hash {id} : $ hash {user } : $ 해시 {연령} ";}) || DIE Q {데이터를 찾을 수 없습니다. }; # 즉시 사용할 수있는 데이터가 획득됩니다. 내 $ text; $ 멤버 -> ArrayRef ( 'age>?', , 하위 {MY ($ 배열, % 해시) = @_; $ text. = 1, user => 'zoo', nigh => 20) || DIE Q {데이터 regist에서 실패합니다. }; # 업데이트 멤버가 다른 설정 =?, 나이 = 나이 + 1 여기서 id =? $ 회원 -> 업데이트 (ID => 1, 기타 => 'GAO', 연령 => 1) || DIE Q {데이터 업데이트에서 실패합니다. }; 또는 $ 멤버 -> 업데이트 ( 'id =?', {id => , 기타 => 'gao', 연령 => 1}) || DIE Q {데이터 업데이트에서 실패합니다. }; # 업데이트에서 실패 할 때 레코드가 추가됩니다. $ 멤버 -> update_insert (user => 'Zaza', 연령 => 22); # 레코드가없는 경우 추가합니다. $ 멤버 -> find_insert (user => 'Zaza', AGE => 22); # 갱신 멤버 설정 나이 =? $ 회원 -> 업그레이드 (연령 => 20); # user = 멤버에서 삭제 #? $ 멤버 -> 삭제 ( 'user =?', 'Zaza'); # 회원에서 삭제; $ 멤버 -> 명확한; # SQL 문은 그대로 사용됩니다. MY $ hash = $ ES-> 해시 {q {선택 * 여기서 id =?}, $ id가 됨); My $ LIST = $ ES-> ArrayRef (Q {Q {Select * 멤버에서는 Age>?}, $ Age); MY $ SCALAR = $ ES-> 스칼라 (Q {멤버에서 사용자를 선택하십시오. 여기서 id =?}, $ ID); $ ES-> DO (Q {ID, 사용자, 연령) 값 (?, 사용자,?)}, $ ID, $ 사용자, $ AGE); # ] 지원. MY $ HASH = $ 회원 -> ABS_HASHREF (@Fields, @ 필드, @ 미더); MY $ ARRAY = $ 회원 -> ABS_ARRAYREF (@ 필드, % 여기서, @ 미더); $ 회원 -> ABS_INSERT (% fieldvals || @values); $ 멤버 -> ABS_UPDATE (% fieldvals, % fieldvals, %); $ 회원 -> ABS_DELETE (% 어디에서); # 테이블 통합. # # A.USER, a.MESSAGE, B.ID, B.AGE, C.Email_addr # 메시지에서 A.User = B.User # 왼쪽의 조인 프로파일 C on b.id = c.ID # 여기서 a.message_id =? # MY $ JDB = $ ES-> DB (QW / MESSAGES = 멤버 : a.user = b.user <프로필 : bid = cid ); $ list = $ jdb-/> arrayref ( 'a.user, a.message, b.id, b.age, c.email_addr', 'a.message_id =?', $ msgid); # committ_ok가 정의되지 않은 경우 트랜잭션 #을 처리하면 항상 롤백입니다. $ ES-> COMMIT_OK (1); $ es-> 닫기; $ dbh-> 연결 해제; 요구 사항 : · perl 요구 사항 : · Perl.

달걀 :: mod :: EasyDBI. 관련 소프트웨어