Dear fellow monks,

I'm trying to learn how to understand EDIFACT messages and so installed http://search.cpan.org/~colinsc/Business-Edifact-Interchange/

But when I run it, I get warnings and error messages. 

given is experimental at C:/strawberry/perl/site/lib/Business/Edifact/
+Interchange.pm line 114.
when is experimental at C:/strawberry/perl/site/lib/Business/Edifact/I
+nterchange.pm line 115.
when is experimental at C:/strawberry/perl/site/lib/Business/Edifact/I
+nterchange.pm line 119.
when is experimental at C:/strawberry/perl/site/lib/Business/Edifact/I
+nterchange.pm line 124.
when is experimental at C:/strawberry/perl/site/lib/Business/Edifact/I
+nterchange.pm line 128.
when is experimental at C:/strawberry/perl/site/lib/Business/Edifact/I
+nterchange.pm line 132.
Modification of non-creatable array value attempted, subscript -1 at C
+:/strawberry/perl/site/lib/Business/Edifact/Message.pm line 603, <DAT
+A> line 1.

[download]

The warnings I t hink I can live with, but what about the error message?

Here my self contained program with data: 

#!perl
use strict;
use warnings;
use Business::Edifact::Interchange;

use Data::Dumper;

my $edifact_message = <DATA>; 
chomp($edifact_message);

my $foo = Business::Edifact::Interchange->new();
my $x=$foo->parse($edifact_message);
print Dumper $x->messages;

__DATA__
UNA:+.? 'UNB+UNOC:3+1234567890123:14+3210987654321:14+131021:1523+391'
+UNH+1+INVOIC:D:96A:UN:EAN008'BGM+380+1077642090+9'DTM+137:20111020:10
+2'DTM+35:20111020:102'FTX+AAK+1+ST2++DE'FTX+SUR+1++DAS LEISTUNGSDATUM
+ ENTSPRICHT DEM RECHNUNGSDATUM+DE'RFF+ON:2330-35573'RFF+DQ:283506034'
+DTM+171:20111018:102'RFF+ABO:1087211625'DTM+171:20111020:102'NAD+BY+3
+210987654321::9'RFF+VA:230/5740/0622'RFF+API:3508566'NAD+DP+405096402
+3306::9'NAD+SU+1234567890123::9'RFF+VA:DE220564280'TAX+7+VAT+++:::7+S
+'CUX+2:EUR:4'LIN+1++1234567654321:EN'PIA+1+03460262:SA::91'IMD+A++:::
+NESLR Focaccia (24x400g) DE'IMD+C++IN'QTY+47:1:PCE'MOA+203:32.65'MOA+
+131:-12.95'PRI+AAB:45.6:::1:PCE'ALC+A+1++1+DI'MOA+8:12.95'RTE+1:12.95
+'LIN+2++1234567654321:EN+1:1'IMD+C++CU'QTY+59:1:PCE'UNS+S'MOA+77:34.9
+4'MOA+79:32.65'MOA+125:32.65'MOA+124:2.29'TAX+7+VAT+++:::7+S'MOA+79:3
+2.65'MOA+124:2.29'TAX+7+VAT+++:::7+S'MOA+125:32.65'UNT+44+1'UNH+2+INV
+OIC:D:96A:UN:EAN008'BGM+393+1087211625+9'DTM+137:20111020:102'NAD+CPE
++3210987654321::9'RFF+FC:230/5740/0622'NAD+SU+1234567890123::9'RFF+VA
+:DE220564280'NAD+PR+3210987654321::9'NAD+PE+1234567890123::9'TAX+7+VA
+T+++:::7+S'CUX+2:EUR:4'PAT+3'DTM+13:20111025:102'UNS+S'MOA+86:34.94'M
+OA+9:34.94'MOA+124:2.29'MOA+125:32.65'UNT+19+2'UNZ+2+391'

[download]

Update

The author fixed the warning messages and the bug in V0.06.

s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{%
+.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e

In reply to Edifact anyone? by Skeeve

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.