| Kwalify documentation | Contained in the Kwalify distribution. |
Schema::Kwalify -
Not yet
I expect that there will be other schema languages for data structures defined. It would be nice if the implementations would use the Schema:: namespace, and that these modules share a common interface.
Slaven Reziæ, <srezic@cpan.org>
| Kwalify documentation | Contained in the Kwalify distribution. |
# -*- mode: cperl; coding: latin-2 -*- # # $Id: Kwalify.pm,v 1.4 2007/03/04 10:50:06 eserte Exp $ # Author: Slaven Rezic # # Copyright (C) 2006,2007 Slaven Rezic. All rights reserved. # This package is free software; you can redistribute it and/or # modify it under the same terms as Perl itself. # # Mail: slaven@rezic.de # WWW: http://www.rezic.de/eserte/ # package Schema::Kwalify; use strict; use vars qw($VERSION); $VERSION = sprintf("%d.%02d", q$Revision: 1.4 $ =~ /(\d+)\.(\d+)/); use Kwalify qw(); sub new { bless {}, shift; } sub validate { my($self, $schema, $data) = @_; Kwalify::validate($schema, $data); } 1; __END__