lib/DX/Value/String.pm

   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
   9 sub for_deparse { [ string => $_[0]->string_value ] }
  10
  11 sub to_data { ''.$_[0]->string_value }
  12
  13 1;