[dbsrgits/Data-Query.git] / lib / Data / Query / ExprBuilder.pm

package Data::Query::ExprBuilder;

use strictures 1;

sub new {
  bless({ %{$_[1]} }, (ref($_[0])||$_[0]));
}

1;
Commit	Line	Data
9ee33178	1	package Data::Query::ExprBuilder;
	2
	3	use strictures 1;
	4
	5	sub new {
	6	bless({ %{$_[1]} }, (ref($_[0])\|\|$_[0]));
	7	}
	8
	9	1;