Help for this page

Select Code to Download

Select or download this

cmpthese(
    -3,
...
        sys   => sub { system 'perl script.pl' },
    }
);