Select Code to Download

#!/usr/bin/perl
use strict;
...
    print  "$_ \t= @{$data{$_}}\n";

}

Animal    keepers    M/F    YEAR    DOB    AGE    FSM    PREM ET    ND
+ AL    EAL
GIRAFFE    JAMES LE    M    9    10/12/2007        Y    Y    N    N
HIPPOS    JACKIE LEAN    F    6    11/12/2007        Y    N    Y    Y
ZEBRAS    JAMES LEHERN    M    3    12/12/2007        N    N    N    Y
LIONS    AMIE CAHORT    M    1    13/12/2012        Y    Y    Y    N

Animal    GIRAFFE
keepers    JAMES LE
...
PREM ET    N
ND AL    Y
EAL    N