\documentclass{article}
\makeatletter
\typeout{l@greek = \the\l@greek}
\typeout{l@monogreek = \the\l@monogreek}
\typeout{l@polygreek = \the\l@polygreek}
\typeout{l@ancientgreek = \the\l@ancientgreek}
\makeatother
\usepackage[greek]{babel}
% The (*1) line tells Greek should be polytonic.
%\languageattribute{greek}{polutoniko} %(*1)
\begin{document}
\typeout{language = \the\language}
\end{document}
