NAME WWW::SpinnerChief - SpinnerChief API VERSION version 0.01 SYNOPSIS use WWW::SpinnerChief; my $sc = WWW::SpinnerChief->new( apikey => 'blabla', username => 'fayland', password => 'password', ); my $x = $sc->quota_left() or die $sc->errstr; print "quota_left: $x\n"; my $spintax = $sc->text_with_spintax('Hello, what is your name? - ♣ ♦ ‾ ←') or die $sc->errstr; print "spintax: $spintax\n"; my $unique_variation = $sc->unique_variation('This is a great software') or die $sc->errstr; print "unique_variation: $unique_variation\n"; DESCRIPTION METHODS CONSTRUCTION use WWW::SpinnerChief; my $sc = WWW::SpinnerChief->new( apikey => 'blabla', username => 'fayland', password => 'password', ); * apikey * username * password required quota_used quota_left # querytimes=1 my $x = $sc->quota_used() or die $sc->errstr; print "quota_used: $x\n"; # querytimes=2 my $x = $sc->quota_left() or die $sc->errstr; print "quota_left: $x\n"; text_with_spintax($text, $params) spintype = 0 my $spintax = $sc->text_with_spintax('Hello, what is your name? - ♣ ♦ ‾ ←') or die $sc->errstr; print "spintax: $spintax\n"; unique_variation($text, $params) spintype = 1 my $unique_variation = $sc->unique_variation('This is a great software') or die $sc->errstr; print "unique_variation: $unique_variation\n"; my $new_text = $sc->unique_variation($text, { tagprotect => '[]', spinhtml => 1, }) or die $sc->errstr; AUTHOR Fayland Lam COPYRIGHT AND LICENSE This software is copyright (c) 2013 by Fayland Lam. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.