use POSIX; print POSIX::tan(atan2 (1, 1));