Gražina kosinusą (radianais). Jei EXPR funkcijai nenurodytas, cos() suveiks ant $_.

Atvirkštiniam rezultatam gauti galima pasinaudoti Math::Trig::acos() funkcija, arba tiesiog:

    sub acos { atan2( sqrt(1 - $_[0] * $_[0]), $_[0] ) }