Select Code to Download

my @matches = $pdus =~ /[^{}]+ | \{ (?: (?R) | [^{}]+ )+ \} /gx;

...
[     11] 25/2/2017-19:02:06.980 proces_name thanos-Rx:            lin
+e110: data
[     11] 25/2/2017-19:02:06.980 proces_name thanos-Rx:            }'
        ];

my @matches = $pdus =~ /\{ (?: (?R) | [^{}]+ )+ \}/gx;

...
[     11] 25/2/2017-19:02:06.980 proces_name thanos-Rx:            lin
+e110: data
[     11] 25/2/2017-19:02:06.980 proces_name thanos-Rx:            }'
        ];

#!/usr/bin/perl
use strict;
...
          '[     17] 25/2/2017-19:02:07.413 proces_name thanos-Tx: UDT
+',
          '[     18] 25/2/2017-19:02:09.794 proces_name thanos-Rx: UDT
+'
        ];