Use of uninitialized value $regex in regexp compilation at ./compare.lexicons.pl line ...