$_ = 'ABCDEDBCA ABCDEFGFEDCBA'; 
s[([A-E])][ "func_$1" ]gee;;