File Coverage

blib/lib/Farly/Builder.pm

Criterion	Covered	Total	%
statement	24	24	100.0
branch			n/a
condition			n/a
subroutine	8	8	100.0
pod	0	3	0.0
total	32	35	91.4

package Farly::Builder;

use 5.008008;
use strict;
use warnings;
use Carp;
use Log::Any qw($log);

our $VERSION = '0.26';

sub new {
    my $class = shift;

    my $self = {
        FILE      => undef,
        CONTAINER => undef,
    };
    bless( $self, $class );

    $log->info("$self NEW");

    return $self;
}

sub set_file {
    my ( $self, $file ) = @_;

    $self->{FILE} = $file;

    $log->info( "$self SET FILE TO " . $self->{FILE} );
}

sub file {
    return $_[0]->{FILE};
}

1;
__END__