$SeatLoc =~ /(\b[A-Z]+\d+\.\d+[A-Z]*)/)