sub OK_clicked_cb {
	
my ( $widget, $entry) = @_;

	my $entry_text = $entry->get_text();
	foreach (@entry){
		my $entry_text = $entry[$i]->get_text();
		print "$entry_text";
		$i++;
	}

##</code><code>##

sub OK_clicked_cb {

	my ( $widget, $entry) = @_;
	
	##Testing stuff
	my $vbox4 = $builder->get_object('vbox4'); #Have 5 elements, but need 4
	my @children = $vbox4->get_children('vbox4'); #Line 40
	print "@children\n";
	
	my $i = 0;

	for ($i < 3){
		my $entry_text = $children[$i]->get_text();
		print "$entry_text\n";
		$i++;
	}
}

##</code><code>##

*** Gtk3::Container::get_children: passed too many parameters (expected 1, got 2); ignoring excess at my-gui.pl line 40
Gtk3::Entry=HASH(0x8ad5e60) Gtk3::Entry=HASH(0x8bda0e8) Gtk3::Entry=HASH(0x8bda1ec) Gtk3::Entry=HASH(0x8bda084) Gtk3::Label=HASH(0x8b9641c)
192.168.0.2

##</code><code>##

sub OK_clicked_cb {

	##Testing stuff
	my @entry_widgets =0;	
	my @object_names = ("ip-value","ssid-value","psk-value","device-value");

	$entry_widgets[0] = $builder->get_object( $object_names[0])->get_text();
	$entry_widgets[1] = $builder->get_object( $object_names[1])->get_text();
	$entry_widgets[2] = $builder->get_object( $object_names[2])->get_text();
	$entry_widgets[3] = $builder->get_object( $object_names[3])->get_text();

	print $entry_widgets[0]."\n";
	print $entry_widgets[1]."\n";
	print $entry_widgets[2]."\n";
	print $entry_widgets[3]."\n";
        
}