::NBConvert::VERSION = '0.012';
use strict;
use warnings;
use Getopt::Long;
use Path::Class;
use JSON::MaybeXS;
use Markdown::Pod;
use HTML::FromANSI;
use Moo;
has ansi_css => ( is => 'ro',
default
($self) = @_;
my $file = shift @ARGV;
$self->notebook_file( file($file) );
my $data = decode_json( $self->notebook_file->slurp );
my $output = $self->to_pod( $data );
print $output;
}
sub to
sage::ZMQ;
$Devel::IPerl::Message::ZMQ::VERSION = '0.012';
use strict;
use warnings;
use Moo;
use JSON::MaybeXS;
use namespace::autoclean;
use Digest::SHA qw(hmac_sha256_hex);
extends qw(Devel::IPerl
_uuids => \@uuids,
header => decode_json($header),
parent_header => decode_json($parent_header),
metadata => decode_json($metadata),
content => decode_json($content),
blobs => [ @blobs_rest
lized;
my @blob_order = qw( header parent_header metadata content );
$serialized->{$_} = encode_json( $self->$_ ) for @blob_order;
# implement HMAC signature
my $hmac_signature;
if( $self->has_s
PATH, Alien::ZMQ::latest->bin_dir;
}
}
use ZMQ::FFI 1.18 qw( ZMQ_PUB ZMQ_REP ZMQ_ROUTER );
use JSON::MaybeXS;
use Path::Class;
use IO::Async::Loop;
use IO::Async::Handle;
use IO::Handle;
use IO::As
ync::Loop->new; }
#}}}
# Connection configuration {{{
# Read in connection info from JSON file {{{
# path to JSON file with connection data
has connection_file => ( is => 'ro', trigger => 1 );
sub _t
on_data => ( is => 'lazy' );
sub _build_connection_data {
my ($self) = @_;
# read JSON file
my $data = decode_json file($self->connection_file)->slurp;
$self->_connection_data_config( $data );
$d