NAME

WebService::Pixabay - Perl 5 interface to Pixabay API.

VERSION

version 0.0.6

SYNOPSIS

        use WebService::Pixabay;
        
        my $pix = WebService::Pixabay->new(api_key => 'secret');
        
        # default searches
        my $img_search = $pix->image_search();
        my $vid_search = $pix->video_search();

        $pix->show_data_structure($img_search);
        $pix->show_data_structure($vid_search);
        
        ###################################################
        # The parameters of the method have the same name #
        # and default values as in Pixabay API docs       #
        ###################################################

        # example custom image search
        my $nis = $pix->image_search(
                q => 'cats dog',
                lang => 'es',
                response_group => 'high_resolution',
                image_type => 'illustration',
                category => 'animals',
                safesearch => 'true',
                order => 'latest',
                page => 2,
                per_page => 5,
                pretty => 'true'
        );

        # example custom video search
        my $nvs = $pix->video_search(
                q => 'tree',
                lang => 'en',
                pretty => 'false',
                page => 3,
                order => 'popular'
        );


        $pix->show_data_structure($nis);
        $pix->show_data_structure($nvs);

        # example retrieving webformatURL from each arrays
        my @urls = undef;

        foreach my $url (@{$img_search->{hits}}) {
                
                # now has link of photo urls (non-preview photos)
                push(@urls, $url->{webformatURL});              
        }

SEE ALSO

Pixabay API documentations

Moo

Function::Parameters

Test::More

WebService::Client

LWP::Online

Data::Printer

AUTHOR

faraco <skelic3@gmail.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2017 by faraco.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.