Perl
cos EXPR Возвращает косинус EXPR, выраженного в радианах. Если EXPR опущено, возвращает косинус $_.
EXPR
$_