*** ./script.pl.orig	Wed Jun 10 09:39:27 2009
--- ./script.pl	Wed Jun 10 09:39:39 2009
***************
*** 30,36 ****
  {
  @flds = split;
  next if (@flds < 7);
! next if ($flds[1] ne 'LSYM' || $flds[6] !~ /([^:]+):[tT]/);
  $syms{$1} =1;
  }
  }
--- 30,36 ----
  {
  @flds = split;
  next if (@flds < 7);
! next if ($flds[1] ne 'LSYM' || $flds[6] !~ /([^:]+):t/);
  $syms{$1} =1;
  }
  }