1 package DX::Lib::FS::Action::CreateDirectory;
3 use aliased 'DX::Lib::FS::Fact::PathStatus';
4 use aliased 'DX::Lib::FS::Fact::PathStatusInfo';
7 with 'DX::Role::Action';
9 has path => (is => 'ro', required => 1);
13 return +(path_status => PathStatus->new(
15 info => PathStatusInfo->new(is_directory => 1, mode => '')
21 mkdir($self->path) or die "Couldn't mkdir ${\$self->path}: $!";
22 +(path_status => PathStatus->new(path => $self->path));