NAME
Catmandu::Store::File::Simple - A Catmandu::FileStore to store files on disk
SYNOPSIS
# From the command line
# Export a list of all file containers
$ catmandu export File::Simple --root t/data to YAML
# Export a list of all files in container '1234'
$ catmandu export File::Simple --root t/data --bag 1234 to YAML
# Add a file to the container '1234'
$ catmandu stream /tmp/myfile.txt to File::Simple --root t/data --bag 1234 --id myfile.txt
# Download the file 'myfile.txt' from the container '1234'
$ catmandu stream File::Simple --root t/data --bag 1234 --id myfile.txt to /tmp/output.txt
# Delete the file 'myfile.txt' from the container '1234'
$ catmandu
delete
File::Simple --root t/data --bag 1234 --id myfile.txt
# Define a configuration file
$ cat catmandu.yml
---
store:
mypaths:
package
: DBI
options:
data_source: dbi:sqlite:dbname=data/
index
.db
myfiles:
package
: File::Simple
options:
root: data/files
directory_index_package: Map
directory_index_options:
store_name: mypaths
bag_name: data
...
# Use the default 'catmandu.yml' configuraion file to add data to the FileStore
$ catmandu stream /tmp/myfile.txt to myfiles --bag 1234 --id myfile.txt
$ catmandu stream myfiles --bag 1234 --id myfile.txt to /tmp/myfile.txt
# From Perl
use
Catmandu;
my
$store
= Catmandu->store(
'File::Simple'
,
root
=>
't/data'
);
my
$index
=
$store
->
index
;
# List all folder
$index
->bag->
each
(
sub
{
my
$container
=
shift
;
"%s\n"
,
$container
->{_id};
});
# Add a new folder
$index
->add({
_id
=>
'1234'
});
# Get the folder
my
$files
=
$index
->files(
'1234'
);
# Add a file to the folder
$files
->upload(IO::File->new(
'<foobar.txt'
),
'foobar.txt'
);
# Retrieve a file
my
$file
=
$files
->get(
'foobar.txt'
);
# Stream the contents of a file
$files
->stream(IO::File->new(
'>foobar.txt'
),
$file
);
# Delete a file
$files
->
delete
(
'foobar.txt'
);
# Delete a folder
$index
->
delete
(
'1234'
);
DESCRIPTION
Catmandu::Store::File::Simple is a Catmandu::FileStore implementation to store files in a directory structure. Each Catmandu::FileBag is a deeply nested directory based on the numeric identifier of the bag. E.g.
$store
->bag(1234)
is stored as
${ROOT}/000/001/234
In this directory all the Catmandu::FileBag items are stored as flat files.
METHODS
new(root => $path , [ keysize => NUM , uuid => 1])
Create a new Catmandu::Store::File::Simple with the following configuration parameters:
- root
-
The root directory where to store all the files. Required.
- keysize
-
DEPRECATED: use directory_index_package and directory_index_options
By default the directory structure is 3 levels deep. With the keysize option a deeper nesting can be created. The keysize needs to be a multiple of 3. All the container keys of a Catmandu::Store::File::Simple must be integers.
- uuid
-
DEPRECATED: use directory_index_package and directory_index_options
If the to a true value, then the Simple store will require UUID-s as keys
- directory_index_package
-
package name that translates between id and a directory.
prefix "Catmandu::DirectoryIndex::" can be omitted.
Default: Catmandu::DirectoryIndex::Number
- directory_index_options
-
Constructor arguments for the directory_index_package (see above)
- directory_index
-
instance of Catmandu::DirectoryIndex.
When supplied, directory_index_package and directory_index_options are ignored.
When not, this object is constructed from directory_index_package and directory_index_options.
INHERITED METHODS
This Catmandu::FileStore implements:
The index Catmandu::Bag in this Catmandu::Store implements:
The file Catmandu::Bag in this Catmandu::Store implements:
SEE ALSO
Catmandu::Store::File::Simple::Index, Catmandu::Store::File::Simple::Bag, Catmandu::Plugin::SideCar, Catmandu::FileStore