perfsonar_ps :: client :: status :: SQL.

상태 MA 데이터베이스와 직접 상호 작용하는 방법을 제공하는 모듈
지금 다운로드

perfsonar_ps :: client :: status :: SQL. 순위 및 요약

광고

  • Rating:
  • 특허:
  • Other/Proprietary Li...
  • 가격:
  • FREE
  • 게시자 이름:
  • Aaron Brown
  • 게시자 웹사이트:
  • http://search.cpan.org/~perfsonar/

perfsonar_ps :: client :: status :: SQL. 태그


perfsonar_ps :: client :: status :: SQL. 설명

직접 상태 MA 데이터베이스와 상호 작용하는 방법을 제공하는 모듈 perfSONAR_PS :: 클라이언트 :: 상태 :: SQL이 하나가 상태 MA SQL 백엔드 직접 방법의 표준 세트를 사용하여 상호 작용 할 수있는 Perl 모듈이다. 제공하는 API는 웹 서비스 인터페이스를 통해 MA가와 상호 작용하기위한 API와 동일합니다. 따라서, 읽거나 상태 MA를 업데이트하기 위해 작성된 클라이언트 쉽게 required.The 모듈은 객체의 각 인스턴스가 연결을 나타내는 개체로 취급하는 경우의 기본 데이터베이스를보다 효율적으로 상호 작용을 허용와 직접 상호 작용을 수정할 수 있습니다 하나의 데이터베이스에. 각 방법은 다음 특정 database.SYNOPSIS 사용 perfSONAR_PS :: 클라이언트 :: 상태 :: SQL에 대한 객체를 호출 할 수 있습니다; 내 $의 status_client 새로운 perfSONAR_PS :: 클라이언트 :: 상태 :: SQL ( "SQLite는 : DBI DBNAME = status.db을") =; (정의되지 $의 status_client는) {인쇄 "문제는 N \ 상태 MA에 대한 클라이언트 만들기"를하는 경우; 종료 (-1); } 내 ($ 상태, $ 고해상도) = $ status_client-> 공개; ($ 상태! = 0) {프린트 경우 "문제 개구 상태 MA : 입술 $ \ n '; 종료 (-1); } ($ 상태 $ 입술) = $ status_client->를 getAll (); 경우 ($ 상태! = 0) {인쇄 "문제는 전체 데이터베이스 점점 : $ 입술 \ n"을; 종료 (-1); } 내 @ 링크 = (); 내 $ id를 foreach는 (키 % {$ 고해상도}) {인쇄 "링크 ID : $ 아이디 \ n"; 내 $ 링크를 foreach는 (@ {$ 고해상도를 -> {$ ID}}) {인쇄 "\ t". $ 링크 -> getStartTime. "-". $ 링크 -> getEndTime. "\N"; 인쇄 "\ t-지식 수준을". $ 링크 -> getKnowledge. "\N"; 인쇄 "\ t-operStatus을". $ 링크 -> getOperStatus. "\N"; 인쇄 "\ t-adminStatus을". $ 링크 -> getAdminStatus. "\N"; } 푸시 @ 링크, $ 아이디; } ($ 상태, $ 고해상도) = $ status_client-> getLinkStatus (\ @ 링크, ""); 경우 (! $ 상태 것은 = 0) { "문제는 가장 최근의 연결 상태 획득 : $ 고해상도를 \ n"인쇄; 종료 (-1); } 내 $ 아이디 (키에게 %를 {$ 고해상도}) foreach는 {인쇄 "링크 ID : $ 아이디 \ n"; 내 $ 링크를 foreach는 (@ {$ 고해상도를 -> {$ ID}}) {인쇄 "-operStatus". $ 링크 -> getOperStatus. "\N"; "-adminStatus를"인쇄 할 수 있습니다. $ 링크 -> getAdminStatus. "\N"; }} ($ 상태, $ 고해상도) = $ status_client-> getLinkHistory (\ @ 링크) ($ 상태! = 0)의 경우 {인쇄 "문제 획득 링크의 역사 : $ 고해상도 \ n"; 종료 (-1); } 내 $ 아이디 (키에게 %를 {$ 고해상도}) foreach는 {인쇄 "링크 ID : $ 아이디 \ n"; 내 $ 링크를 foreach는 (@ {$ 고해상도를 -> {$ ID}}) {인쇄 "-operStatus". $ 링크 -> getOperStatus. "\N"; "-adminStatus를"인쇄 할 수 있습니다. $ 링크 -> getAdminStatus. "\N"; }} 요구 사항 : · Perl.


perfsonar_ps :: client :: status :: SQL. 관련 소프트웨어

회사 소개