#! /usr/bin/perl
use XUL::Gui;
$moreThanOne=5;
display Window title => "Pacientes",
        GroupBox(
		for($i=0;$i<=$moreThanOne;$i++){
				Label (value=>$i);
			},	
);