נטו :: אמזון :: מכניקה net :: אמזון :: מכניקה היא אמזון מכני טורק SDK עבור Perl.
הורד עכשיו

נטו :: אמזון :: מכניקה דירוג וסיכום

נטו :: אמזון :: מכניקה תגים

פרל מודול - אֲמָזוֹנָה אמזון MechanicalTurk MechanicalTurk

נטו :: אמזון :: מכניקה תיאור

Net :: אמזון :: מכניקה היא אמזון מכני SDK טורק עבור Perl. Net :: אמזון :: מכניקה היא אמזון מכני טורקית SDK עבור perl.configationConfiguring מפתחות הגישה שלך ואת כתובות אתרים שירות אינטרנט. מכניקה טורט צרכים למקשי גישה לאימות. אם לא תציין את כל התכונות הרלוונטיות, הקובץ mturk.Properties נקרא מתוך ספריית הבית שלך עבור מידע זה. RUN הפקודה: Perl -MNET :: אמזון :: מכניקור :: Configureto עזרה לך ליצור קובץ זה .Synopsismodule עבור API מכני טורקית. השתמש ב- Net :: אמזון :: מכניקה; # ליצור לקוח Mechturk חדש שלי $ mturk = net :: אמזון :: מכניקה-> חדש (); # ליצור לקוח Mechturk חדש ללא שימוש mturk.Properties שלי mturk = net :: אמזון :: מכניקורק-> חדש (Suppliesurl => 'http://mechanicalturk.sandbox.amazonaws.com/?service=awsmechanicalTurkrequester', supportsversion = > '2007-06-21', accesskey = '1aaaaa1aaaaaa11a11', secretkey => '1aaaaaaaaaa + aaaaaaaaaaaa / aaaaaaa1aaaaa); # קבל את היתרה שלי $ 3 $ = $ mturk-> getaccountbalance-> {penerlebalance} {סכום} ; הדפס "האיזון שלך הוא $ balancen"; # Createhit שלי $ שאלה = "תגיד לי משהו מעניין."; LableXML $ שלי = << end_xml; <שאלה> 1 $ שאלה << answspecification/> <שאלה/> end_xml שלי $ תוצאה = $ mturk-> creathit (title => 'תשובה שאלה', תיאור => 'מבחן מכה מ- Perl ', מילות מפתח =>' שלום, עולם ', גמול => = curantcode =>' USD ', כמות => 0.01}, מבחן =>' מבחן פגע ', הקצאה, * 60 * 10, maxaxignments => 1, lifetimeinseconds => 60 * 60, שאלה => $ showlexmal); PrintF "נוצר מכה: n"; PrintF "HITID:% SN", $ תוצאה-> {HITID} ; PrintF "HITTIPEID:% SN", $ תוצאה-> {hittypeid} ; # לאשר את כל הקצאות שהוגשו $ hits = $ mturk-> GetrevieweInhall; בעוד ($ $ hit = $ hits-> הבא) {שלי $ hitid = $ hit-> {hitid} ; הקצאות שלי $ = $ mturk-> getassignmentsfarthitall (hitid => $ hitid, הקצאה => 'הוגשה'); בעוד (ההקצאה שלי $ = $ הקצאות-> הבא) {CHASTMENTIDID = $ = $ -> {משיחה} ; $ mturk-> Approveasignment (הקצאה => $ הקצאה); }} דרישות: · דרישות Perl: · פרל

נטו :: אמזון :: מכניקה תוכנה קשורה