Select Code to Download

my $Configure =
    {
...
                        }xi
                  ]
    };

my $Configure =
    {
...
    };

$Configure->{'find'}->[1] = qr/^ $Configure->{'find'}->[1] /xi;