Friday, April 25, 2008

Debugging fun Solaris Perl crash

Can you spot what's wrong with this picture (truss output of Perl on Solaris)?

/10:    llseek(12, 0, SEEK_CUR)                         = 180224
/10:    llseek(12, 0, SEEK_CUR)                         = 180224
/10:    brk(0x0281D3F0)                                 = 0
/10:    brk(0x0281F3F0)                                 = 0
/10:    read(12, " $ d { " b u s i n e s s".., 8192)    = 8192
/10:    llseek(12, 0, SEEK_CUR)                         = 188416
/10:    llseek(12, 0, SEEK_CUR)                         = 188416
/10:    brk(0x0281F3F0)                                 = 0
/10:    brk(0x028213F0)                                 = 0
/10:    llseek(12, 0, SEEK_CUR)                         = 188416
/10:    llseek(12, 0, SEEK_CUR)                         = 188416
/10:    llseek(12, 0, SEEK_CUR)                         = 188416
/10:    brk(0x028213F0)                                 = 0
/10:    brk(0x028233F0)                                 = 0
/10:    llseek(12, 0, SEEK_CUR)                         = 188416
/10:    brk(0x028233F0)                                 = 0
/10:    brk(0x028253F0)                                 = 0
/10:    llseek(12, 0, SEEK_CUR)                         = 185518
/10:    brk(0x028253F0)                                 = 0
/10:    brk(0x028273F0)                                 = 0
/10:    llseek(12, 0, SEEK_CUR)                         = 185518
/10:    llseek(12, 0, SEEK_CUR)                         = 185518
Here's a hint:

llseek man page
http://docs.sun.com/app/docs/doc/805-8005-03/6j7hcvh5p?l=ru&a=view
at