scripts/scancpan: use SPDX short identifier for license

Signed-off-by: Rahul Bedarkar <rahulbedarkar89@gmail.com>
Signed-off-by: Thomas Petazzoni <thomas.petazzoni@free-electrons.com>

diff --git a/support/scripts/scancpan b/support/scripts/scancpan
index b6123de02d1a327312529d7d85abff377d831d29..8d44ed908e5c9fe8b283e35a5f89612a4d34f951 100755 (executable)
--- a/support/scripts/scancpan
+++ b/support/scripts/scancpan
@@ -688,7 +688,7 @@ while (my ($distname, $dist) = each %dist) {
         $license =~ s|artistic_2|Artistic-2.0|;
         $license =~ s|mit|MIT|;
         $license =~ s|openssl|OpenSSL|;
-        $license =~ s|perl_5|Artistic or GPLv1+|;
+        $license =~ s|perl_5|Artistic or GPL-1.0+|;
         my $license_files = join q{ }, @{$license_files{$distname}};
         say qq{write ${mkname}} unless $quiet;
         open my $fh, q{>}, $mkname;