Initialize fixed version to empty string to silence warnings

briandfoy · briandfoy · commit 482c3c149af0 · 2024-08-24T00:51:41.000-04:00
Not everything has a fixed version.
diff --git a/script/cpan-audit b/script/cpan-audit
@@ -45,6 +45,7 @@ sub format_advisory {
     if ( $advisory->{fixed_versions} ) {
     	my @v = ref $advisory->{fixed_versions} ? $advisory->{fixed_versions}->@* : $advisory->{fixed_versions};
     	my $first = shift @v;
+    	$first //= '';
         $s .= "    Fixed range:    $first\n";
         $s .= "                    $_\n" for @v;
     }

Original file line number	Diff line number	Diff line change
`@@ -45,6 +45,7 @@ sub format_advisory {`
`45`	`45`	`if ( $advisory->{fixed_versions} ) {`
`46`	`46`	`my @v = ref $advisory->{fixed_versions} ? $advisory->{fixed_versions}->@* : $advisory->{fixed_versions};`
`47`	`47`	`my $first = shift @v;`
	`48`	`+ $first //= '';`
`48`	`49`	`$s .= " Fixed range: $first\n";`
`49`	`50`	`$s .= " $_\n" for @v;`
`50`	`51`	`}`