@zips = m/\G(?:(?!44)\d\d\d\d\d)*(44\d\d\d)/g; ----------------------------------------------------------------------------- Copyright 1997-2024 Jeffrey Friedl