[scpubgit/DX.git] / lib / DX / Value / String.pm

package DX::Value::String;

use DX::Class;

with 'DX::Role::Value';

has string_value => (is => 'ro', required => 1);

sub to_data { ''.$_[0]->string_value }

1;
Commit	Line	Data
9d759b64	1	package DX::Value::String;
	2
	3	use DX::Class;
	4
	5	with 'DX::Role::Value';
	6
	7	has string_value => (is => 'ro', required => 1);
	8
9e13b86b	9	sub to_data { ''.$_[0]->string_value }
9e13b86b	10
9d759b64	11	1;