use String::License::Naming::SPDX;
my $spdx = String::License::Naming::SPDX->new;
my $license = [ grep { /^(Expat|Perl)$/ } $spdx->list_licenses ]; # => is_deeply ['Perl']
Some licenses are known by different names. E.g. the license ``MIT'' according to SPDX is named ``Expat'' in Debian.
Some licenses are not always represented. E.g. ``Perl'' is a (discouraged) license in Debian while it is a relationship of several licenses with SPDX (and that expression is recommended in Debian as well).
By default, licenses are matched using naming schemes "[ 'spdx', 'internal' ]", which lists all supported licenses, preferrably by their SPDX name or as fallback by an internal name.
Includes all licenses defined by SPDX, and presents them by their SPDX shortname.
Copyright © 2023 Jonas Smedegaard
This program is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License as published by the Free Software Foundation, either version 3, or (at your option) any later version.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more details.
You should have received a copy of the GNU Affero General Public License along with this program. If not, see <https://www.gnu.org/licenses/>.