use Win32::GuiTest qw( :ALL );
	use warnings;
	use Win32::GUI();
	 my @whnds = FindWindowLike( undef, "NT App" );
     if( !@whnds ){
         die "Cannot find window with title/caption App\n";
     }else{
         printf( "Window handle of App application is %x\n", $whnds[ 0 ] );
    }
	
my	@lst = GetChildWindows($whnds[ 0 ] );
	
	my $edit_ctrl_id = 233; #Edit window, 193 Hex
    my @edit = FindWindowLike( $whnds[ 0 ], undef, "^SysListView32");
     if( !@edit ){
         die "Cannot find window handle for Edit control\n";
     }else{
         printf( "Edit window handle is %x\n", $edit[ 0 ] );
		
	     SelListViewItem( $edit[ 0 ], 1);
	
	}