my $tainted_name = join '_', $prefix, split //, $suffix;
        $tainted_name =~ /^(.+)$/;
        my $name = $1;
        # run is(...) test with $name here