The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package ValidatorPackagesTest1;

sub match_single_validator_success_expected {
	my $val = shift;
	return 1;
}

sub match_single_validator_failure_expected {
	return undef;
}

sub filter_single_filter_remove_whitespace {
	my $val = shift;
    $val =~ s/^\s+//;
    $val =~ s/\s+$//;
    return $val;
}

1;