BEGIN { sub DEBUG {1} }

use if DEBUG, Data::Dumper;
# ...