%{$caller . '::} = (); # clobber our caller.

local $SIG{__WARN__} = 'IGNORE'; # temporarily turn off all warnings (this is the least bad, imho)