$VAR1 = bless( {                                                                                                                                                                                         
                 'default_charset' => 'UTF-8',                                                                                                                                                           
                 'enctype' => 'application/x-www-form-urlencoded',                                                                                                                                       
                 'accept_charset' => 'UNKNOWN',                                                                                                                                                          
                 'action' => bless( do{\(my $o = 'https://xyz//create')}, 'URI::https' ),                                                                                       
                 'method' => 'POST',                                                                                                                                                                     
                 'attr' => {                                                                                                                                                                             
                             'method' => 'post'                                                                                                                                                          
                           },                                                                                                                                                                            
                 'inputs' => [                                                                                                                                                                           
                               bless( {                                                                                                                                                                  
                                        '/' => '/',                                                                                                                                                      
                                        'value_name' => '',                                                                                                                                              
                                        'src' => '/images/save.jpg',                                                                                                                            
                                        'name' => 'Sichern',                                                                                                                                             
                                        'onclick' => 'return confirm(\'Wollen Sie wirklich speichern?\')',                                                                                               
                                        'type' => 'image'                                                                                                                                                
                                      }, 'HTML::Form::ImageInput' ),                                                                                                                                     
                               bless( {                                                                                                                                                                  
                                        '/' => '/',                                                                                                                                                      
                                        'value_name' => '',                                                                                                                                              
                                        'src' => '/images/close.png',                                                                                                                         
                                        'name' => 'Abbrechen',                                                                                                                                           
                                        'type' => 'image'                                                                                                                                                
                                      }, 'HTML::Form::ImageInput' ),                                                                                                                                     
                               bless( {                                                                                                                                                                  
                                        '/' => '/',                                                                                                                                                      
                                        'value_name' => '',                                                                                                                                              
                                        'value' => 'dummy',                                                                                                                                              
                                        'name' => 'name',                                                                                                                                                
                                        'type' => 'text'                                                                                                                                                 
                                      }, 'HTML::Form::TextInput' ),                                                                                                                                      
                               bless( {                                                                                                                                                                  
                                        '/' => '/',                                                                                                                                                      
                                        'value_name' => '',                                                                                                                                              
                                        'value' => 'dummy-User mechanisch',                                                                                                                              
                                        'name' => 'Kommentar-Bemerkung',                                                                                                                                             
                                        'type' => 'text'                                                                                                                                                 
                                      }, 'HTML::Form::TextInput' ),                                                                                                                                      
                               bless( {                                                                                                                                                                  
                                        '/' => '/',                                                                                                                                                      
                                        'value_name' => '',                                                                                                                                              
                                        'value' => 'dummy',                                                                                                                                              
                                        'name' => 'pwd1',                                                                                                                                           
                                        'type' => 'password'                                                                                                                                             
                                      }, 'HTML::Form::TextInput' ),                                                                                                                                      
                               bless( {                                                                                                                                                                  
                                        '/' => '/',                                                                                                                                                      
                                        'value_name' => '',                                                                                                                                              
                                        'value' => 'dummy',                                                                                                                                              
                                        'name' => 'pwd2',                                                                                                                                           
                                        'type' => 'password'                                                                                                                                             
                                      }, 'HTML::Form::TextInput' ),                                                                                                                                      
                               bless( {                                                                                                                                                                  
                                        'current' => 2,                                                                                                                                                  
                                        'menu' => [                                                                                                                                                      
                                                    {                                                                                                                                                    
                                                      'value' => '',                                                                                                                                     
                                                      'name' => "Bitte waehlen"                                                                                                                      
                                                    },                                                                                                                                                   
                                                    {
                                                      'value' => 'admin',
                                                      'name' => 'Administrator'
                                                    },
                                                    {
                                                      'seen' => 1,
                                                      'value' => 'abc',
                                                      'name' => 'Bereich-abc'
                                                    },
                                                    {
                                                      'value' => 'def',
                                                      'name' => 'Bereich-def'
                                                    },
                                                    {
                                                      'value' => 'xyz',
                                                      'name' => 'Bereich-xyz'
                                                    }
                                                  ],
                                        'name' => 'role',
                                        'class' => 'boxinput',
                                        'idx' => 1,
                                        'type' => 'option'
                                      }, 'HTML::Form::ListInput' )
                             ]
               }, 'HTML::Form' );

================================
$VAR1 = bless( {
                 '/' => '/',
                 'value_name' => '',
                 'src' => '/images/save.png',
                 'name' => 'Sichern',
                 'onclick' => 'return confirm(\'Wollen Sie wirklich speichern?\')',
                 'type' => 'image'
               }, 'HTML::Form::ImageInput' );
$VAR2 = bless( {
                 '/' => '/',
                 'value_name' => '',
                 'src' => '/images/close.png',
                 'name' => 'Abbrechen',
                 'type' => 'image'
               }, 'HTML::Form::ImageInput' );