Net :: STF :: Client. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Daisuke Maki
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~dmaki/
Net :: STF :: Client. ű×
Net :: STF :: Client. ¼³¸í
Net :: STF :: Client´Â STF Servers.SynoPSIS¿ÍÀÇ ´ëȸ¦À§ÇÑ STF ÇÁ·ÎÅäÄÝÀ» ±¸ÇöÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Synopsis Net :: STF :: Client; MY $ CLIENT = NET :: STF :: CLEAN-> NEW (URL => "http:///stf.example.com", repl_count => 3); # ±âº» AUTH¸¦ »ç¿ëÇÏ·Á¸é # MY $ CLIENT = NET :: STF :: CLIENT -> NEW (# ... ´Ù¸¥ PARMS ... # USERNAME => ...., # ºñ¹Ð¹øÈ£ => ... , #); # Ŭ¶óÀ̾ðÆ®¿¡¼ Á÷Á¢ CRUD (URLÀÌÀÖ´Â °æ¿ì) $ object = $ client-> put_object ($ URL, $ content, \ % opts); $ object = $ client-> get_object ($ URL, \ % opts); $ bool = $ client-> delete_object ($ URL, \ % opts); $ bool = $ client-> delete_bucket ($ URL, \ % opts); # ¹öŶ ÁöÇâ ÀÎÅÍÆäÀ̽º MY $ BUCKET = $ CLIENT-> create_bucket ($ bucket_name); $ object = $ bucket-> put_object ($ Å°, $ content, \ % opts); $ object = $ bucket-> get_object ($ Å°, \ % opts); $ bool = $ bucket-> del_object ($ Å°, \ % opts); $ bool = $ bucket-> »èÁ¦ ($ Àç±Í Àû); # °³Ã¼ µ¥ÀÌÅÍ $ °³Ã¼ -> URL; $ °´Ã¼ -> Å°; $ °´Ã¼ -> ÄÜÅÙÃ÷; Á¦Ç°ÀÇ È¨ÆäÀÌÁö
Net :: STF :: Client. °ü·Ã ¼ÒÇÁÆ®¿þ¾î