У меня есть документ XML, отправляемый мне по HTTP POST:
<?xml version="1.0" encoding="UTF-8" ?>
<DeliveryNotification eventType="newMessage">
<requestUid>sms9676187</requestUid>
<sentMessageUid>sms29282896</sentMessageUid>
....
</DeliveryNotification>
Который я затем получаю в perl-скрипте с использованием функции param ():
#!/usr/bin/perl -w
use strict;
use CGI qw/param/;
use Data::Dumper;
my @xml = param();
warn Dumper(@xml);
и когда я получаю Dumper результат, я получаю:
$VAR1 = '<?xml version';
Кажется, что файл разбивается всякий раз, когда он сталкивается со знаком '='. Если я уберу первый знак eqauls для проверки, он просто сломается при следующем. Можно ли решить эту проблему только с той стороны, которая отправляет данные, избегая равных, или я могу что-то сделать в Perl?