> [-
> use PostboxParse;
> $chunk1 = "<POSTBOX
> ACTION=UPDATE>soap\@foo.bar<PASSWORD></PASSWORD><FWADDR>soup\@blo.
> bli.blub.de</FWADDR></POSTBOX>";
> my $p = PostboxParse->new(); # create a new object
> $p->parse($chunk1); # parse the string
> $xx = $p->eof; # signal end of document
> @aaa = $p->readmsg(); # get back the error-messages
> foreach (@aaa){ # ... and print them
> print "...>>>$_\n";
You must print to OUT i.e.
print OUT "...>>>$_\n";
or use a [+ +] block instead
Gerald
> }
> -]
>
-------------------------------------------------------------
Gerald Richter ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting
Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
E-Mail: [EMAIL PROTECTED] Voice: +49 6133 925151
WWW: http://www.ecos.de Fax: +49 6133 925152
-------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
