main::(./t/hsltupletest.t:20):	ok($tuple->is_valid([qw~361 62 99~]) == 0 , "A must be between 0 and 360 since it is degrees");
  DB<2> s
FakeTuple::is_valid(FakeTuple.pm:34):
34:	    my ($self, $data2Check) = @_;
  DB<2> l
34==>	    my ($self, $data2Check) = @_;
35:	    my $result = 0;
36:	    for(0..2){$result++ if ($data2Check->[$_]=~m/\d+/ && 
37 			            $data2Check->[$_] >= 0    &&
38 				    $data2Check->[$_] <= 100)};
39 	    
40:	    return ( $result == $self->no_of_axes() ) ? 1 : 0;
41 	}
42 	
43 	# code (loosely) borrowed from Basis.pm
  DB<2>