package Tree::Transform::XSLTish::Optimizer::StructMatcher;
use struct;
use warnings;
use Scalar::Util qw(blessed looks_like_number reftype);

sub match {
    my ($datum,$struct) = @_;

    my $dc=blessed($datum);my $sc=blessed($struct);
    my $dr=reftype($datum);my $sr=reftype($struct);

    
}

1;