I'm at work now, where I use Win32::GUITest to automate a stubborn application, and here is a modified version of the spy-- program that I used to look at the current selection in a listbox. The stubborn program displays its status by filling a listbox with all possible status values and then selecting the active status...

# $Id: guitest-spy.html,v 1.1 2001/09/19 23:31:36 erngui Exp $
#
# MS has a very nice tool (Spy++).
# This is Spy--
#
use Win32::GuiTest qw/FindWindowLike GetWindowText GetClassName IsWind
+owEnabled GetWindowID
    GetChildDepth GetDesktopWindow GetComboContents GetListContents Ge
+tListText SendKeys /;
use Win32::API;

for (FindWindowLike(0,qr/^Explorer -/)) {
    SendKeys("%ao");
    print "Looking for dialog\n";
    my @dialog = FindWindowLike($_,qr/Optionen/,"");
    print "Looking for listbox\n";
    my @listbox = FindWindowLike($dialog[0],"","",752);

    while (1) {
      print "Getting current selection\n";
      my $i = SendMessage($listbox[0], LB_GETCURRSEL,0,0 );
      print $i;
      print "Getting current selection text\n";
      my $t = GetListText($listbox[0],$i);
      print $t,"\n";
      sleep 1;
    };
}
[download]