File Coverage

blib/lib/HTML/Blitz/Atom.pm

Criterion	Covered	Total	%
statement	13	13	100.0
branch	1	2	50.0
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	17	18	94.4

# This code can be redistributed and modified under the terms of the GNU
# General Public License as published by the Free Software Foundation, either
# version 3 of the License, or (at your option) any later version.
# See the "COPYING" file for details.
package HTML::Blitz::Atom;
use HTML::Blitz::pragma;
use constant ();

our $VERSION = '0.09';

method import($class: @names) {
    @_ = (
        $class,
        { map +($_ => ':' . tr/_/-/r), @names },
    );
    goto &{constant->can('import')};
}

1