By using overload and overloading q for the constant string parts and the "."-operator for the string concatenations in between.

UPDATE: If this whole thread is just about interpolating method-calls in strings/templates, you should consider the De/Ref-trick with @{[...]} :

perl -e '
{package test; sub test {return "test"}}; 
$a=[];
bless $a, test;  
print "@{[$a->test]}"
'
[download]

please note: here $a->test is called in list context, for scalar context use ${\$a->test} !

UPDATE2: After rereading overload I have the impression that overloading "" might be the approach to overload qq ... but this might also affect all other possible stringifications...(!?!)

By using overload and overloading q for the constant string parts and the "."-operator for the string concatenations in between.

That doesn't overload qq. It's already done its job by then

Your example printed the return value of the test() but I didn't see any lexical changes to happen.

The function I am now looking for, should be able to access the callers lexicals same way as qq operator does, to be able to create other new (better) ways to interpolate strings. Or, as in my original case, I would use callers local variables with the template string from the same caller. You should think the qq as a small template processor function to see the problem in my viewpoint.

If my goal is possible achieve it also means that you can write new functions which gives allmost same effect as macro proprocessors functions does in C.

...to see the problem in my viewpoint.

sorry I have no real idea what you want...

Cheers Rolf

UPDATE: I'm speculating you don't want to "overload qq" but simulate operators working on variable names.

So please explain, what's the problem with PadWalker (as already suggested) for lexical vars and (if necessary) inspecting the stash (symbol table hash) for package vars???