There's a stacktracing version of warn in Carp: cluck. You can enable it (globally, and temporarily) by using:

use Carp;
local $SIG{__WARN__} = \&Carp::cluck;
[download]