From 084e72d390de05bfa7f16b54b97f339d491bfff2 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 22 Mar 2018 01:58:27 +0100
Subject: [PATCH] perl: update distro support upto 2017 releases

Information gathered from distrowatch.com.
---
 perl.inc.pl | 32 ++++++++++++++++++++++++++------
 perl.plp    |  2 +-
 2 files changed, 27 insertions(+), 7 deletions(-)

diff --git a/perl.inc.pl b/perl.inc.pl
index 8811bab..ae02b3a 100644
--- a/perl.inc.pl
+++ b/perl.inc.pl
@@ -42,6 +42,7 @@ use utf8;
 			rhel => '2', # v5.6.0; also in red hat 7.0
 			solaris => '9', # v5.6.1; 2002-05 eol 2014-10
 			aix => '5.1', # 2001-05 eol 2006-04
+			opensuse => '7.1',
 		},
 		unicode => '3.0.1',
 	},
@@ -64,6 +65,8 @@ use utf8;
 			centos => '3-5', # v5.8.0 in v3 (2004-03); v5.8.8 in v5 (eol 2017-03)
 			ubuntu => '4.10',
 			aix => '5.2', # v5.8.0; v5.8.2 in 5.3 and 6.1 (eol 2017-04-30)
+			freebsd => '4-6',
+			opensuse => '8.1',
 		},
 		distrosum => "dinosaur platforms such as Solaris 10, AIX 5.2, RHEL 3, SLES 8",
 		unicode => '3.2.0',
@@ -90,6 +93,7 @@ use utf8;
 			centos => '6', # v5.10.1 (2011-07 eol 2020-11)
 			ubuntu => '8.10', # v5.10.1 in 10.04 LTS
 			aix => '7.1', # v5.10.1 (2010-09 eol 2020?)
+			opensuse => '11.0',
 		},
 		unicode => '5.0.0',
 	},
@@ -108,6 +112,8 @@ use utf8;
 		distro => {
 			solaris => '11', # also v5.8.4; 2010-11 eol 2024-11
 			ubuntu => '11.10',
+			freebsd => '7',
+			opensuse => '11.3',
 		},
 	},
 
@@ -122,10 +128,11 @@ use utf8;
 		],
 		release => '2011-05-14',
 		distro => {
-			debian => 'wheezy',
+			debian => '7', # wheezy 2013-05 eol 2018-05
 			ubuntu => '12.04',
+			opensuse => '12.1',
 		},
-		distrosum => "stable servers such as Debian wheezy, Ubuntu 12.04, CentOS 7",
+		distrosum => "stable servers such as Debian 7, Ubuntu 12.04, CentOS 7",
 		unicode => '6.0+#8',
 	},
 
@@ -139,6 +146,8 @@ use utf8;
 		distro => {
 			rhel => '7', # v5.16.3
 			centos => '7', # v5.16.3 (2014-07 eol 2024-06)
+			freebsd => '9',
+			opensuse => '12.2',
 		},
 		unicode => '6.1',
 	},
@@ -153,7 +162,8 @@ use utf8;
 		],
 		release => '2013-05-18',
 		distro => {
-			ubuntu => '14.04',
+			ubuntu => '14.04 LTS', # trusty
+			opensuse => '13.1',
 		},
 		unicode => '6.2',
 	},
@@ -168,10 +178,12 @@ use utf8;
 		unicode => '6.3',
 		release => '2014-05-27',
 		distro => {
-			debian => 'jessie',
-			ubuntu => '14.10',
+			debian => '8', # jessie 2015-04 eol 2020-05
+			ubuntu => '14.10', # utopic
 			aix => '7.2',
+			opensuse => '13.2', # 2014-11 eol 2017-01
 		},
+		distrosum => "stable servers such as Debian 8 (oldstable), Ubuntu 14.10, FreeBSD 10, openSUSE 13.2",
 	},
 
 	v5.22 => {
@@ -187,7 +199,7 @@ use utf8;
 		unicode => '7.0',
 		release => '2015-06-01',
 		distro => {
-			ubuntu => '16.04',
+			ubuntu => '16.04 LTS', # xenial
 		},
 	},
 
@@ -199,6 +211,11 @@ use utf8;
 		],
 		unicode => '8.0',
 		release => '2016-05-09',
+		distro => {
+			debian => '9', # stretch 2017-06
+			ubuntu => '17.04', # zesty
+			freebsd => '10',
+		},
 	},
 
 	v5.26 => {
@@ -209,5 +226,8 @@ use utf8;
 		],
 		unicode => '9.0', # also Script_Extensions/scx in "\p{script}"
 		release => '2017-05-30',
+		distro => {
+			ubuntu => '17.10', # artful
+		},
 	},
 }
diff --git a/perl.plp b/perl.plp
index 8735f5f..1635621 100644
--- a/perl.plp
+++ b/perl.plp
@@ -22,7 +22,7 @@ my $info = do 'perl.inc.pl' or die $@ // $!;
 say "Depending on desired compatibility you'll want to support a minimum of";
 say join(' or ', map {
 	sprintf '<span title="on %s">v%vd</span>', $info->{$_}->{distrosum}, $_
-} v5.8, v5.14), '.';
+} v5.8, v5.20), '.';
 say '</p>';
 
 for my $vernum (reverse sort keys %{$info}) {
-- 
2.30.0