# Get position only
($x, $y) = $CONSOLE->Cursor();

##</code><code>##

    @info = $CONSOLE->Info();
    print "Cursor at $info[3], $info[4].\n";