change version strings to include perl version
[spider.git] / cmd / show / version.pl
index 0b0f0cfb66df9645b7675af023173a2810f48c22..5707504a190705138cbdfe91cd289e203cf7c172 100644 (file)
@@ -23,7 +23,7 @@ if ($self->priv > 5 && @in) {
 } else {
        my ($year) = (gmtime($main::systime))[5];
        $year += 1900;
-       push @out, "DX Spider Cluster version $main::version (build $main::build git: $main::gitbranch/$main::gitversion) on \u$^O";
+       push @out, "DXSpider v$main::version (build $main::build git: $main::gitbranch/$main::gitversion) using perl $^V on \u$^O";
        push @out, "Copyright (c) 1998-$year Dirk Koopman G1TLH";
 }