Versions and portability

Author: H.Merijn Brand - Tux

ChangeLog

@@ -1,9 +1,10 @@
-0.89    - 08 Sep 2017, H.Merijn Brand
+0.89    - 14 Sep 2017, H.Merijn Brand
     * Implement dictionary introspection in HLI
       - add $dbh->func ("db_dict")
       - new tests
       - introspection now has more information and is about 10 times faster
     * Make table name used for testing less error-prone
+    * Versions and portability
 
 0.88    - 28 Jul 2017, H.Merijn Brand
     * Tested with perl-5.22 on Linux x64 with DS 9.1B

examples/describe.pl

@@ -1,10 +1,10 @@
 #!/usr/bin/perl
 
-use 5.14.2;
+use strict;
 use warnings;
 
-our $VERSION = "0.02 - 20170901";
-my $cmd = $0 =~ s{.*/}{}r;
+our $VERSION = "0.02 - 20170914";
+(my $cmd = $0) =~ s{.*/}{};
 
 sub usage {
     my $err = shift and select STDERR;
@@ -81,7 +81,7 @@ sub usage {
 		$dd->{COLUMN}[$l]{TNAME},
 		$dd->{COLUMN}[$l]{NAME};
 	    my $ts = $dd->{TABLE}[$dd->{COLUMN}[$l]{TID}]{ANAME};
-	    substr $L, 0, 0, "$ts."              if $ts ne $ENV{USCHEMA} // "";
+	    substr $L, 0, 0, "$ts."              if $ts ne $ENV{USCHEMA} || "";
 	    substr $L, 0, 0, sprintf "%3d: ", $l if $opt_v;
 	    }
 

sandbox/genMETA.pl

@@ -75,7 +75,7 @@
     perl:                5.020001
     DBI:                 1.637
 test_recommends:
-    Test::More:          1.302086
+    Test::More:          1.302096
 resources:
     license:             http://dev.perl.org/licenses/
     repository:          https://github.com/perl5-dbi/DBD-Unify