my $code = << 'ET';

{

  ---   Some lines of code ---
}

ET

test($code);