Commit | Line | Data |
---|---|---|
8c3eab7b | 1 | package DX::Lib::FS::Observation::FileContent; |
2 | ||
3 | use DX::Lib::FS::Fact::FileContent; | |
0d1a41d9 | 4 | use DX::Lib::FS::Guts; |
8c3eab7b | 5 | use Moo; |
6 | ||
7 | has path => (is => 'ro', required => 1); | |
8 | ||
9 | sub run { | |
10 | my ($self) = @_; | |
0d1a41d9 | 11 | my $data = DX::Lib::FS::Guts->file_content($self->path); |
12 | return () unless defined($data); | |
8c3eab7b | 13 | +(file_content => DX::Lib::FS::Fact::FileContent->new( |
14 | path => $self->path, | |
15 | data => $data | |
16 | )); | |
17 | } | |
18 | ||
19 | 1; |