File Coverage

blib/lib/Net/Spotify/Search.pm

Criterion	Covered	Total	%
statement	18	18	100.0
branch	2	2	100.0
condition	2	3	66.6
subroutine	4	4	100.0
pod	1	1	100.0
total	27	28	96.4

package Net::Spotify::Search;

use strict;
use warnings;

use base 'Net::Spotify::Service';

our $VERSION = '0.03';

sub format_request {
    my ($self, $method, %parameters) = @_;

    my $base_url = $self->base_url();
    my $version = $self->version();
    my $format = $self->format();

    my $uri = URI->new("$base_url/search/$version/$method.$format");

    foreach my $key (qw(q page)) {
        if (exists $parameters{$key} && $parameters{$key}) {
            $uri->query_param($key, $parameters{$key});
        }
    }

    return HTTP::Request->new('GET', $uri);
}

1;

__END__