fix --version message to not have uninitialized values

briandfoy · Sep 10, 2024 · ac9cc99 · ac9cc99
1 parent e6352ac
commit ac9cc99
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/script/cpan-audit b/script/cpan-audit
@@ -121,7 +121,14 @@ sub format_text {
 
 sub output_version {
 	my( $class, $exit_code ) = @_;
-	print "$0 version $VERSION using:\n\tCPAN::Audit @{[ CPAN::Audit->VERSION ]}\n\tCPANSA::DB  @{[ CPANSA::DB->VERSION ]}\n";
+	print <<"HERE";
+$0 version $VERSION using:
+\tCPAN::Audit      @{[ CPAN::Audit->VERSION ]}
+\tCPAN::Audit::DB  @{[ CPAN::Audit::DB->VERSION // '<not installed>' ]}
+\tCPANSA::DB       @{[ CPANSA::DB->VERSION // '<not installed>' ]}
+
+HERE
+
 	exit($exit_code);
 }