Help for this page

Select Code to Download

Select or download this

my $json = '{

...
        },
    ...
}';

Select or download this

Win8 Strawberry 5.8.9.5 (32)  Mon 10/04/2021 20:14:50
C:\@Work\Perl\monks
...
 Yes: Smith Doe - 4444 | 1

 No sec value, just the name: Joseph D.