while (defined(my $handshake = <$newSocket>))
		   {			    
			   print "inside loop\n";
		   }
print "outside loop\n";