If that is the real format string ...
$regexpr -> $regexp
And I am not sure about the extra spaces follwin the commas.
I would use $regexp(%albumartist%,(^The )(.+),'$2, $1')
And a note on the contents: I don't think that the "the" is still required for proper sorting. You could just as well simply delete it.