Select Code to Download

#!/usr/bin/perl -- -w

...
    use Tk::TableMatrix::Spreadsheet   ; # TK Calendar
    use Data::Dumper    ;
    use List::Util qw(first); # for original attempt to determine if a
+rray had a value (abandoned use)