Yet Another CPAN Grep

Spreadsheet-Wright ( T/TO/TOBYINK/Spreadsheet-Wright-0.107.tar.gz, TOBYINK, 2020; MetaCPAN )

Spreadsheet-Wright/lib/Spreadsheet/Wright/JSON.pm ( view source; MetaCPAN )

sheet::Wright::JSON;

use 5.010;
use strict;
use warnings;
no warnings qw( uninitialized numeric );

BEGIN {
	$Spreadsheet::Wright::JSON::VERSION   = '0.107';
	$Spreadsheet::Wright::JSON::AUTHORITY =

'cpan:TOBYINK';
}

use Carp;
use JSON;

use parent qw(Spreadsheet::Wright);

sub new
{
	my ($class, %args) = @_;
	my $self = bless { 'options' => \%args }, $class;
	$self->{'_FILENAME'} = $args{'file'

{'_FH'}->print(
			to_json($self->{'data'}->{$self->{'_WORKSHEET'}}, $self->{'json_options'})
			);
	}
	else
	{
		$self->{'_FH'}->print(
			to_json($self->{'data'}, $self->{'json_options'})
			);
	}

Spreadsheet-Wright ( T/TO/TOBYINK/Spreadsheet-Wright-0.107.tar.gz, TOBYINK, 2020; MetaCPAN )

Spreadsheet-Wright/lib/Spreadsheet/Wright.pm ( view source; MetaCPAN )

on = {
		auto    => 'CSV',
		csv     => 'CSV',
		excel   => 'Excel',
		html    => 'HTML',
		json    => 'JSON',
		ods     => 'OpenDocument',
		odsxml  => 'OpenDocumentXML',
		text    => 'CSV',
		txt

item * B<format> - format of spreadsheet - 'csv', 'xls',  'xlsx', 'html', 'xhtml', 'xml', 'ods', 'json', or 'auto' (default).

=item * B<sheet> - first sheet name (optional, not supported by some form