my $bblock1 = "[a-f]";
my $bblock2 = "foo";
my $bblock3 = "(?:$bar|$baz)";