Readers: 17
if( $val =~ /$pat/ )
Quotebakery|beverages|bicycle|books|car|car_repair|car_parts|chemist|clothes|computer|department_store|dry_cleaning|doityourself|
electronics|florist|furniture|garden_centre|hairdresser|hardware|hifi|laundry|mall|motorcycle|optician|organic|outdoor|sport
s|supermarket|shoes|toys|video|pet
if( $val =~ /^(?:$pat)$/ )