Select Code to Download

my $string = join '|', @{ $responsetextall[$i][$j]{set}{Client}{redire
+ct_uris} };