undef $/; my $XML = ;