use MooseX::Storage;
with MooseX::Storage::MaybeDeferred => {
default_format => 'JSON',
default_io => 'File',
};
has 'x' => (is => 'rw', isa => 'Int');
has 'y
_point = Point->load($filename);
# or
$another_point = Point->load($filename, {format => 'JSON', io => 'File'});
=head1 DESCRIPTION
With the module L<MooseX::Storage> you are hard coding the