my @wkbData = unpack("cLdd", $wkb);
my $wkbType = wkbData[1];
my $wkbPointX = wkbData[2];
my $wkbPointY = wkbData[3];