File Coverage

blib/lib/Eixo/Rest/Uri.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod	0	1	0.0
total	18	19	94.7

package Eixo::Rest::Uri;

use strict;
use Eixo::Base::Clase;

my $REG_PARAM = qr/\:(\w+)/;

has(

    args=>undef,

    uri_mask=>undef,

);

sub build{
    my ($self) = @_;

    my $mask = $self->uri_mask;

    my @implicit_params;

    my $c_mask = $mask;

    while($mask =~ /$REG_PARAM/g){

        my ($param_name, $param_value) = (

            $1,

            $self->args->{$1}

        );

        push @implicit_params, $1;

        $c_mask =~ s/\:$param_name/$param_value/g;

    }

    return $c_mask, @implicit_params;
}

1;