Mash
(
L/LS/LSKATZ/Mash-0.5.tar.gz, LSKATZ, 2019;
MetaCPAN
)
se Exporter qw(import);
use File::Basename qw/fileparse basename dirname/;
use Data::Dumper;
use JSON ();
use Encode qw/encode decode/;
our $VERSION = 0.5;
our @EXPORT_OK = qw(raw_mash_distance);
it to a json-formatted file
my $msh2 = Mash->new("all.msh");
$msh2->writeJson("all.json");
# Read the json file
my $mashJson = Mash->new("all.json");
my $dist = $msh2->dist($mashJson); # yie
One object per set of files.
Arguments: Sketch filename (valid types/extensions are .msh, .json, .json.gz)
Hash of options (none so far)
Returns: Mash object
=back
=cut
sub n