lib/DX/RefSet.pm

   1 package DX::RefSet;
   2
   3 use DX::FactRef;
   4 use DX::ArrayStream;
   5 use Moo;
   6
   7 has target => (is => 'ro', required => 1);
   8
   9 has names => (is => 'ro', required => 1);
  10
  11 sub to_stream {
  12   my ($self) = @_;
  13   return DX::ArrayStream->from_array(
  14     map DX::FactRef->new(fact_type => $self->target, fact_id => $_),
  15       @{$self->names}
  16   );
  17 }
  18
  19 1;