use strict;
use warnings;
...
use XML::Simple qw(:strict);