while (my @row = $_read_sth->fetchall_arrayref)
   {
   
    @ret_values = Dumper @row, @{$_read_sth->{NAME}};
    print "@ret_values\n";
    
  }
  

    

##</code><code>##

 



$VAR1 = [
          [
            'Encumberances to look into:'
          ]
        ];
 $VAR2 = 'Account';
 $VAR3 = 'Symbol';
 $VAR4 = 'Sedol';
 $VAR5 = 'Security Name';
 $VAR6 = 'Encumbered';
 $VAR7 = 'Enc. qty';
 $VAR8 = 'Borrow Acct';

$VAR1 = [
          [
            '15140EQJP_55121',
            'DD UN',
            '2018175',
            'DU PONT (E.I.) DE NEMOURS',
            'BO data mismatch',
            '275000.0',
            '98027EQJP_54981'
          ],
          [
            '15140EQJP_55121',
            'AFL UN',
            '2026361',
            'AFLAC INC',
            'BO data mismatch',
            '100000.0',
            '29075EQJP_54301'
          ],
          [
            '15140EQJP_55121',
            'SLM UN',
            '2101967',
            'SLM CORP',
            'BO data mismatch',
            '180000.0',
            '98002EQJP_54161'
          ],
          [
            '15140EQJP_55121',
            'CMI UN',
            '2240202',
            'CUMMINS INC',
            'BO data mismatch',
            '100000.0',
            '98059EQJP_53421'
          ],
          [
            '15140EQJP_55121',
            'DOW UN',
            '2278719',
            'DOW CHEMICAL',
            'BO data mismatch',
            '175000.0',
            '98027EQJP_54981'
          ],
          

##</code><code>##

Encumberances to look into:

Account, Symbol, Sedol, Security Name, Encumbered, Enc. qty, Borrow Acct
15140EQJP_55121, DD UN, 2018175, DU PONT (E.I.) DE NEMOURS, BO data mismatch, 275000.0, 98027EQJP_54981
15140EQJP_55121, AFL UN, 2026361, AFLAC INC, BO data mismatch, 100000.0, 29075EQJP_54301
15140EQJP_55121, SLM UN, 2101967, SLM CORP, BO data mismatch, 180000.0, 98002EQJP_54161

 
##</code><code>##

 
while (my @row = $_read_sth->fetchall_arrayref)
   {
   
    @ret_values = Dumper @row, @{$_read_sth->{NAME}};
    print "@ret_values\n";
    
  }