Select Code to Download

my $g_nested_brackets;
$g_nested_brackets = qr{
...
      \)
    )
}xs;

use warnings;
use strict;
...

use Test::More tests=>1;
is $output, $expect;