@nw=qw(0 30);   #North West corner
@ne=qw(30 30);  #North East corner
@se=qw(30 0);   #South East corner
@sw=qw(0 0);    #South West corner

@find=qw(10 5); #Point I am trying to find

# my current logic to establish if my point
# does indeed exist inside my four defined
# points.

	if ((($find[0]<($nw[0]<=$sw[0]?$nw[0]:$sw[0])) or #inside of west?
	    ($find[0]>($ne[0]>=$se[0]?$ne[0]:$se[0])))or  #inside of east?
		(($find[1]<($sw[1]<=$se[1]?$sw[1]:$se[1])) or #inside of south?
	    ($find[1]>($ne[1]>=$nw[1]?$ne[1]:$nw[1])))) { #inside of north?
	   die "data is outside of the quadrant\n";
	  }