Current Console Row

arunhorne has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Current Console Row by AcidHawk (Vicar) on May 29, 2003 at 13:45 UTC
Hmmm... have a look at Win32::Console I don't know about any non MS platforms though.. I found something like `# Get position only ($x, $y) = $CONSOLE->Cursor();` [download] Further to that Info Returns an array of informations about the console (or undef on errors), which contains: columns (X size) of the console buffer. rows (Y size) of the console buffer. current column (X position) of the cursor. current row (Y position) of the cursor. current attribute used for Write. left column (X of the starting point) of the current console window. top row (Y of the starting point) of the current console window. right column (X of the final point) of the current console window. bottom row (Y of the final point) of the current console window. maximum number of columns for the console window, given the current buffer size, font and the screen size. maximum number of rows for the console window, given the current buffer size, font and the screen size. See also: Attr, Cursor, Size, Window, MaxWindow. Example: `@info = $CONSOLE->Info(); print "Cursor at $info[3], $info[4].\n";` [download] Hope that helps ----- Of all the things I've lost in my life, its my mind I miss the most.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: Current Console Row
by AcidHawk (Vicar) on May 29, 2003 at 13:45 UTC

Hmmm... have a look at Win32::Console I don't know about any non MS platforms though..

I found something like

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

Further to that

Info

Returns an array of informations about the console (or undef on errors), which contains:

columns (X size) of the console buffer.
rows (Y size) of the console buffer.
current column (X position) of the cursor.
current row (Y position) of the cursor.
current attribute used for Write.
left column (X of the starting point) of the current console window.
top row (Y of the starting point) of the current console window.
right column (X of the final point) of the current console window.
bottom row (Y of the final point) of the current console window.
maximum number of columns for the console window, given the current buffer size, font and the screen size.
maximum number of rows for the console window, given the current buffer size, font and the screen size.
See also: Attr, Cursor, Size, Window, MaxWindow.
Example:
```
    @info = $CONSOLE->Info();
    print "Cursor at $info[3], $info[4].\n";
[download]
```
Hope that helps
-----
Of all the things I've lost in my life, its my mind I miss the most.