in reply to Another question about expanding variables in text strings

Anything wrong with join()ing? It's not as confusing to read, and just as fast: 
join '', "TESTDATA_BETA", $CurrentVal[1], "_DEFL", $CurrentVal[2], "."
+, $CurrentVal[0];

[download]

Hot Pastrami

In Section Seekers of Perl Wisdom