use warnings;
use Test::More;
-use Stash::Manip;
+use Package::Stash;
{
- my $stash = Stash::Manip->new('Foo');
+ my $stash = Package::Stash->new('Foo');
my $val = $stash->get_package_symbol('%foo');
is(ref($val), 'HASH', "got something");
$val->{bar} = 1;
}
{
- my $stash = Stash::Manip->new('Bar');
+ my $stash = Package::Stash->new('Bar');
my $val = $stash->get_package_symbol('@foo');
is(ref($val), 'ARRAY', "got something");
push @$val, 1;