Select Code to Download

.rem *****************************************************************
+*****
.rem *                                                                
+    *
...
.burble nonsense directive here
.declare l_book                         a12
.declare book_date                     a13

use strict;
use warnings;
...

close $inFH
   or die qq{close: $inFile: $!\n};

  Comment Line: .rem *************************************************
+*********************
  Comment Line: .rem *                                                
+                    *
...
   Variable is: l_book
     Data Line: .declare book_date                     a13
   Variable is: book_date