Help for this page

Select Code to Download

Select or download this

$pat = join '|', reverse sort keys %pattern;
$pat = qr/$pat/;