my $got1 = form "#{'(7)'}#", $var;
is( $got1, "#$var#\n", "'(7)'");