sub{			
			for ($c1 = 0; $c1 <  @data; ++$c1){
			  	 print $data[$c1]{value} . "\n";
			}#end for();

			
			if($data{value} eq  "" || null){
				print "You have not entered all the values. Please try again";
				&adduser;#goes back to asking for array members
				sleep 5;
			};#end of if{};
		}#End of anonymous Sub();