Actually, you're replacing the builtin with your sub, not "persuading the parser" to do squat. The only ways to "persuade the parser" to do what you want are

• $caller->warn( ... )
• my_warn $caller ( ... )

Sorry.