my $user_wizard = new Tk::Wizard(
                -title          => " User Wizard",
		-style=>'top',
		-imagepath      => "z:\\BPP\\people.gif",
		-resizable=>"0",
	);