Clear questions and runnable code get the best and fastest answer |
|
PerlMonks |
Re: Re: Re: Re: Tk text widget indices.by perl_seeker (Scribe) |
on Jul 21, 2003 at 11:08 UTC ( [id://276217]=note: print w/replies, xml ) | Need Help?? |
Hi, these fonts use ISFOC/ISCII encoding.Not the 8-bit ASCII.Unicode encoding has been proposed for this script, but most font creation software (e.g. Fontographer) for this script support either ISFOC/ISO Latin/Win 3.1 etc, but not Unicode. I'm using Perl 5.6 which supports Unicode, but that is of no use, since the font I use does not use Unicode encoding. Anyhow does Unicode have anything to do with where the problem is?...... The search function worked correctly giving the position of the first *.The problem is I could not extract the word next to it using the get function because of the escape sequence/metacharcters thing. Could we use a loop here instead of get and read each char after the 2nd * ,one at a time until we get a whitespace? And yes, I can see the actual font in the Tk text widget window on running the script. I could read the entire contents of the window into a scalar and do a regexp search in it, but I still need the positions (line no, char no)of the matches found, in the window. By the way we can do a regexp search in the search function itself, if we use the -regex switch. HTH
In Section
Seekers of Perl Wisdom
|
|