NAME
NetHack::Inventory::Equipment - the player's equipment
VERSION
version 0.06
SYNOPSIS
use NetHack::ItemPool;
my $pool = NetHack::ItemPool->new;
my $excalibur = $pool->new_item("the +3 Excalibur (weapon in hand)");
is($pool->inventory->weapon, $excalibur);
my $grayswandir = $pool->new_item("the +7 Grayswandir (weapon in hand)");
is($pool->inventory->weapon, $grayswandir);