*** glibc detected *** perl: double free or corruption (!prev):

--===============0413578253==
Content-Type: multipart/alternative;
boundary="----=_Part_29033_16905521.1215595814832"

------=_Part_29033_16905521.1215595814832
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

Greeting to All,

While executing a PERL script we are getting an error:

*** glibc detected *** perl: double free or corruption (!prev): 0x08cf3798
***
======= Backtrace: =========
/lib/libc.so.6[0x71c8b6]
/lib/libc.so.6(cfree+0x90)[0x71fe00]
/usr/local/ActiveTcl8.4.13/lib/libtcl8.4.so(TclpFree+0x1f)[0 x12f60f]
/usr/local/ActiveTcl8.4.13/lib/libtcl8.4.so(Tcl_Free+0x1f)[0 x1364cf]
/usr/local/ActiveTcl8.4.13/lib/itcl3.3/libitcl3.3.so
(Itcl_PopContext+0x9b)[0x90fe3b]
======= Memory map: ========
00110000-001ab000 r-xp 00000000 03:03 1149728
/usr/local/ActiveTcl8.4.13/lib/libtcl8.4.so
001ab000-001b5000 rwxp 0009a000 03:03 1149728
/usr/local/ActiveTcl8.4.13/lib/libtcl8.4.so
..
..
..
..
..
..

Please provide some pointers to resolve the issue.
I am using perl "perl-5.8.8-10" and glib version "glib-1.2.10-20.el5" on
Linux enterprise 5

Thanks

--
Sushil Rai

------=_Part_29033_16905521.1215595814832
Content-Type: text/html; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Content-Disposition: inline