my $initial_title_ = eval "\$${initial_threads}_begin";
こういうこと？