File Coverage

blib/lib/Symbol/Alias.pm

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

package Symbol::Alias;
use strict;
use warnings;

our $VERSION = '0.000002';

use Symbol::Methods;

sub import {
    my $class   = shift;
    my $package = caller;

    while (@_) {
        my $old = shift;
        my $new = shift;
        $package->symbol::alias($old, $new);
    }
}

1;

__END__