@redi = $responsetextall[$i][$j]{set}{Client}{redirect_uris};

##</code><code>##

$responsetextall[$i][$j]{set}{Client}{redirect_uris} = [
    'http://abcd01.cpu.comp.com:80/AutosysPortal/',
    'http://abcd01.cpu.comp.com:80/Da/',
    'http://abcd01.cpu.comp.com:80/Ge/',
    'http://abcd01.cpu.comp.com:80/PO/',
    'http://abcd01.cpu.comp.com:80/g/' ];

##</code><code>##

@redi = @{ $responsetextall[$i][$j]{set}{Client}{redirect_uris} };

##</code><code>##

@redi = $responsetextall[$i][$j]{set}{Client}{redirect_uris}->@*;