perldoc > sqrt(mcp)

    sqrt EXPR
    sqrt    Return the positive square root of EXPR. If EXPR is omitted,
            uses $_. Works only for non-negative operands unless you've
            loaded the "Math::Complex" module.

                use Math::Complex;
                print sqrt(-4);    # prints 2i