Регулярное выражение для языкового тега (как определено в BCP47)

Мне нужно регулярное выражение для языковой тег , как определено в BCP 47 .

Я знаю, что полный синтаксис BNF доступен по адресу http://www.rfc-editor.org/rfc/bcp/bcp47.txt , и что я мог бы использовать его для написания своего собственного, но надеюсь, он уже есть.