my $partial = $item =~ /^([^:]+):/ ? "$1:*" : '*';
$level =
    $access{$item} //
    $access{$partial}) //
    $access{'*'} //
    999;