if($StrictMode  and  $dirn eq 'in') {
      croak "No value specified for 'ForceArray' option in call to XML$dirn()";
    }
    $opt->{forcearray} = 0;

##</code><code>##

open(FILE, "someFile.DTD") or die "can't open file: $!";
#...
my $config = XMLin($FILE, forcearray => 1);