File Coverage

blib/lib/Spreadsheet/WriteExcel/Simple/Save.pm

Criterion	Covered	Total	%
statement	23	23	100.0
branch	2	4	50.0
condition			n/a
subroutine	7	7	100.0
pod	1	1	100.0
total	33	35	94.2

package Spreadsheet::WriteExcel::Simple::Save;

use 5.006;
use strict;
use warnings;

use FileHandle;
use Spreadsheet::WriteExcel::Simple;


use Carp qw(croak);

require Exporter;

our @ISA = qw(Exporter);

# Items to export into callers namespace by default. Note: do not export
# names by default without a very good reason. Use EXPORT_OK instead.
# Do not simply export all your public functions/methods/constants.

# This allows declaration	use Spreadsheet::WriteExcel::Simple::Save ':all';
# If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
# will save memory.
our %EXPORT_TAGS = ( 'all' => [ qw(

) ] );

our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );

our @EXPORT = qw(

);
our $VERSION = '0.05';


# Preloaded methods go here.

sub Spreadsheet::WriteExcel::Simple::save {

    my $self      = shift;
    my $save_name = shift or croak "must supply save file name";

    my $savef = new FileHandle ">$save_name" or die $!;

    binmode($savef);

    $savef->print($self->data);



}

1;
__END__