Select Code to Download

#!/usr/bin/perl -w
use 5.018;

...
Matched |(?^u:[Category("notestrecord")])| in |        [Category("note
+strecord")]|

=cut