my %slot_lkup =
    reverse
    map /^Slot address (\d+).*\n +Volume Tag[ .]+([^\n]+)/s,
    split /(?<=\n)(?! )/,
    $inventory;

...
$slot_lkup{$vol}
...