#!/usr/bin/perl

use strict;
use warnings;

use Data::Dumper;

{
    local $/ = '/////XYZ/////'; #/
    while (<DATA>) {
        s/^\\+\w+\\+//g;
        s/\/+\w+\/+$//g;
        print Dumper [split /\|/, $_];
    }
}

__DATA__
\\\\\XYZ\\\\\Wert100:D|Wert330:12345|Wert400:012345678970|Wert530:16|Wert545:02.08.2006|Wert760:0|Wert761:Hier steht 1 Wert|Wert800:Text1|Wert805:3782|Wert810:Text2|Wert811:Noch ein Wert|Wert820:Im Hafen 00|Wert821:D|Wert822:12345|Wert823:Deutschland|Wert853:XX|Wert854:1231329|Wert860:xxxxxxxxxxx|Wert861:Herr|Wert862:Max Muster|Wert863:Ja auch|Wert864:Text99|/////XYZ/////\\\\\XYZ\\\\\Wert100:D|Wert330:12345|Wert400:012345678970|Wert530:16|Wert545:02.08.2006|Wert760:0|Wert761:Hier steht 1 Wert|Wert800:Text1|Wert805:3782|Wert810:Text2|Wert811:Noch ein Wert|Wert820:Im Hafen 00|Wert821:D|Wert822:12345|Wert823:Deutschland|Wert853:XX|Wert854:1231329|Wert860:xxxxxxxxxxx|Wert861:Herr|Wert862:Max Muster|Wert863:Ja auch|Wert864:Text99|/////XYZ/////