@EXPORT_OK = qw(
                $debug
                ClientToScreen
                FindWindowLike
                GetChildDepth
                GetChildWindows
                GetClassName
                GetCursorPos
                GetDesktopWindow
                GetComboText
                GetComboContents
                GetListText
                GetListContents
                GetParent
                GetScreenRes
                GetWindow
                GetWindowID
                GetWindowLong
                GetWindowRect
                GetWindowText

##</code><code>##

perl -de1
C:\test>perl -de1
Default die handler restored.

Loading DB routines from perl5db.pl version 1.07
Editor support available.

Enter h or `h h' for help, or `perldoc perldebug' for more help.

main::(-e:1):   1
  DB<1> use Win32::GuiTest qw[:ALL :SW]

  DB<5> print GetForegroundWindow( 'A totally meaningless parameter' )
Usage: Win32::GuiTest::GetForegroundWindow() at (eval 8)[E:/Perl/lib/perl5db.pl:1521] line 2.

  DB<7> $f = GetForegroundWindow()

  DB<8> print $f
346162044

  DB<10> GetWindowText()
Usage: Win32::GuiTest::GetWindowText(hwnd) at (eval 13)[E:/Perl/lib/perl5db.pl:1521] line 2.

  DB<12> print GetWindowText( $f )
Command Prompt - perl5.6.1 -de1