#!/usr/local/bin/perl -w

use strict;
use Win32::GUI;

my $winMain = new Win32::GUI::Window(
        -left   => 13,
        -top    => 32,
        -width  => 439,
        -height => 260,
        -name   => "winMain",
        -text   => "Autoscroller"
        );

my $btnTest = $winMain->AddButton(
		-text    => "btnTest",
		-name    => "btnTest",
		-left    => 0,
		-top     => 0,
		-width   => 60,
		-height  => 20,
	    );

$winMain->Show();

Win32::GUI::Dialog();