Clear questions and runnable code
get the best and fastest answer
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
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
Could we use a loop here instead of get and read each
char after the 2nd * ,one at a time until we get a
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.