use Win32::GUI();
    $main = Win32::GUI::Window->new(
                -name   => 'Main',
                -width  => 500,
                -height => 500,
                -text => 'Auto Log',
        );



    $main->AddCombobox(     
        -name   => "combo_box",
        -width  => 120,
        -height => 110,
        #-tabstop=> 1,
        -pos => [5,160],
        -dropdownlist=> 0,
        
        );
    
my $combo_box = $main->AddComboBox(
$combo_box->InsertItem( "One" ),
$combo_box->InsertItem( "Two" ),
$combo_box->InsertItem( "Buckle my shoe" ),
);


    $main->Show();
    Win32::GUI::Dialog();

    sub Main_Terminate {
        -1;
    }