From e833f17326ac625bae32fe6036031f105df74dea Mon Sep 17 00:00:00 2001 From: Bob Polis Date: Mon, 23 Feb 2026 08:22:06 +0100 Subject: [PATCH] Change 'print' to 'say' And add the necessary 'use v5.10' for that, which carries the additional advantage of enabling 'use strict'. --- glv.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/glv.pl b/glv.pl index e519599..b60c3a9 100755 --- a/glv.pl +++ b/glv.pl @@ -1,11 +1,12 @@ #!/usr/bin/env perl +use v5.10; my $all = $ARGV[0] =~ /^-a|--all$/ ? 1 : 0; my @lines = `curl "https://gitlab.com/gitlab-org/gitlab-foss/-/raw/master/CHANGELOG.md" 2>/dev/null`; for (@lines) { if (/^##\s+(\d+\.\d+\.\d+)\s+\((\d+-\d+-\d+)/) { - print "$1 [$2]\n"; + say "$1 [$2]"; unless ($all) { last; }