File Coverage

blib/lib/Nephia/Context.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch			n/a
condition			n/a
subroutine	6	6	100.0
pod	4	4	100.0
total	25	25	100.0

package Nephia::Context;
use strict;
use warnings;

sub new {
    my ($class, %opts) = @_;
    return bless {%opts}, $class;
}

sub get {
    my ($self, $key) = @_;
    return $self->{$key};
}

sub set {
    my ($self, $key, $val) = @_;
    return $self->{$key} = $val;
}

sub delete {
    my ($self, $key) = @_;
    delete $self->{$key};
    return;
}

1;

__END__