in reply to trap warnings in $@
For just perl's internal warnings and registered warnings (which don't seem to have caught on), use warnings FATAL => "all";