$zip =~ m/\d{5,5}/; [download]
In reply to Re: specific numbers of digits by MZSanford in thread specific numbers of digits by emichswimr