From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

#!/usr/bin/perl
use strict;
use Test::More tests => 6;
use lib 'lib';
my $sheet =
Spreadsheet::Engine::Storage::SocialCalc->load('t/data/stringfns.txt');
$sheet->recalc;
my $raw = $sheet->raw;
for my $cell ('D2' .. 'D7') {
ok $raw->{datavalues}{$cell}, "$cell is TRUE";
}