Peter Fleck [mailto:[EMAIL PROTECTED] : : ( : $date=~/^((\d\d?)\/(\d\d?)\/(((\d{2,2}))|(\d{4,4})))($|(,(\s*) : ((\d\d?)\/(\d\d?)\/(((\d{2,2}))|(\d{4,4}))))+$)/ : )
What about split: my @dates = split m#/|,\s*#, 'mm/dd/yy, mm/dd/yy'; printf "Dates retrieved: %s\n", @dates / 3; HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]