Select Code to Download

sub should_pass {
  my ($value, $constraint) = @_;
...

should_pass(2222222, Int);
should_fail(3.14159, Int);