Hi, how to extract five texts on each side of an URI? I post my own perl script and its use.

2006-11-09 Thread 辉 王
Hello, everyone, Recently, when I want to implement Chakrabarti's algorithm using Perl, I found it difficult for me to extract five texts on each side of an URL(except anchor text). I can make my program do its job at last, but it runs slowly. Can anybody tell me how to improve th

Hi, how to extract five texts on each side of an URI? I post my own perl script and its use.

2006-11-11 Thread 辉 王
Hello everyone; Recently, when I want to implement Chakrabarti's algorithm using Perl, I found it difficult for me to extract five texts on each side of an URL(except anchor text). I can make my program do its job at last, but it runs slowly. Can anybody tell me how to improve the

Re: Hi, how to extract five texts on each side of an URI? I post my own perl script and its use.

2006-11-11 Thread Robin Sheat
On Sunday 12 November 2006 13:17, 辉 王 wrote: > I can make my program do its job at last, but it runs slowly. > Can anybody tell me how to improve the running speed of this   > program? Thanks. Have you had a look with the Perl profiler to see which bits are going slow. That way you know to look at

RE: Hi, how to extract five texts on each side of an URI? I post my own perl script and its use.

2006-11-11 Thread Charles K. Clarkson
Hui Wang wrote: : Can anybody tell me how to improve the running speed of this : program? Thanks. I don't know if this is faster, but it is a more accurate solution. Your submitted code failed under some untested circumstances. I created another page similar to the

Re: Hi, how to extract five texts on each side of an URI? I post my own perl script and its use.

2006-11-14 Thread Jenda Krynicky
From: ťÔ Íő <[EMAIL PROTECTED]> > my $text; > for my $left_index (1..WIDTH) { >last if $start_index < $left_index; > $text .= $texts_arr[$start_index - $left_index] . ' '; > } > $text .= join(" ", @texts_arr[$start_index..$end_index]) . ' '; >for my $right_index (1..WIDTH) { >