Help for this page

Select Code to Download

Select or download this

$ cat data/objectives-cqdc.txt
Obj~PosNbr~Year~Div~AVP~Dept~SDescr~Major~Methods~Results~Accompl~JanU
+p~LDescr~Changes~Chars~Goals~Budget~CFObj
...
    year             => 2014
    }
$

Select or download this

use DBI;
use Data::Peek;
...
while (my $row = $sth->fetchrow_hashref) {
    DDumper $row;
    }