Select Code to Download

use Data::Dumper;

my $regex = qr/
...
        tuesday details line 2
field3: data 3 tuesday

$VAR1 = {
          'record 1' => {
...
                          'field3' => ' data 3 tuesday'
                        }
        };