Just as a note for other people :
Test::NoWarnings does the job, but it means that no warnings will be printed until the end of the tests. Which means that you cannot use Smart::Comments, and cannot use warn() to debug.