#!/usr/bin/env perl
use lib 't/lib';
use constant testing_method => 'slot';
use Test::NetHack::Items (
    "a - a +1 long sword (weapon in hand)" => 'a',
    "B + a blessed +0 alchemy smock"       => 'B',

    # if your inventory is full and you pick up an unusual item, # is the
    # overflow slot. you can have multiple items in # even!
    "# - 5 gold pieces"                    => '#',
    "# - a cursed gray stone"              => '#',
);