Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
    print "Match for $hash{$key}{BUS} in:\n   ";
    print join "\n   ", @matches;
}

Select or download this

Match for Plumbing in:
   Elite Plumbing