Hello community,
here is the log from the commit of package perl-Statistics-Descriptive for
openSUSE:Factory checked in at 2016-01-15 10:42:20
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Statistics-Descriptive (Old)
and /work/SRC/openSUSE:Factory/.perl-Statistics-Descriptive.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Statistics-Descriptive"
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Statistics-Descriptive/perl-Statistics-Descriptive.changes
2015-06-23 11:59:36.000000000 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Statistics-Descriptive.new/perl-Statistics-Descriptive.changes
2016-01-15 10:42:22.000000000 +0100
@@ -1,0 +2,22 @@
+Wed Jan 13 10:28:48 UTC 2016 - co...@suse.com
+
+- updated to 3.0612
+ see /usr/share/doc/packages/perl-Statistics-Descriptive/Changes
+
+ 3.0612 2016-01-09
+ - Move the VCS repository to GitHub.
+ - People are more used to it, and it can take part in the CPAN
pull-req
+ challenge.
+
+ 3.0611 2016-01-07
+ - Apply patch from Debian to correct a spelling error.
+ - https://rt.cpan.org/Ticket/Display.html?id=110987
+ - Thanks to Salvatore Bonaccorso for the report and patch.
+
+ 3.0610 2016-01-06
+ - Clarified the docs for add_data_with_samples().
+ - Some people thought they were repeat counts of the data , but they
+ are normally ignored.
+ - Replace remaining tabs with spaces.
+
+-------------------------------------------------------------------
Old:
----
Statistics-Descriptive-3.0609.tar.gz
New:
----
Statistics-Descriptive-3.0612.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Statistics-Descriptive.spec ++++++
--- /var/tmp/diff_new_pack.KbAL0Z/_old 2016-01-15 10:42:23.000000000 +0100
+++ /var/tmp/diff_new_pack.KbAL0Z/_new 2016-01-15 10:42:23.000000000 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Statistics-Descriptive
#
-# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,7 +17,7 @@
Name: perl-Statistics-Descriptive
-Version: 3.0609
+Version: 3.0612
Release: 0
%define cpan_name Statistics-Descriptive
Summary: Module of basic descriptive statistical functions
++++++ Statistics-Descriptive-3.0609.tar.gz ->
Statistics-Descriptive-3.0612.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/Build.PL
new/Statistics-Descriptive-3.0612/Build.PL
--- old/Statistics-Descriptive-3.0609/Build.PL 2015-06-19 09:40:41.000000000
+0200
+++ new/Statistics-Descriptive-3.0612/Build.PL 2016-01-09 22:55:57.000000000
+0100
@@ -35,7 +35,7 @@
{
resources =>
{
- repository =>
"https://bitbucket.org/shlomif/perl-statistics-descriptive";,
+ repository =>
"https://github.com/shlomif/perl-Statistics-Descriptive";,
homepage =>
"http://web-cpan.shlomifish.org/modules/Statistics-Descriptive/";,
},
keywords =>
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/Changes
new/Statistics-Descriptive-3.0612/Changes
--- old/Statistics-Descriptive-3.0609/Changes 2015-06-19 09:40:41.000000000
+0200
+++ new/Statistics-Descriptive-3.0612/Changes 2016-01-09 22:55:57.000000000
+0100
@@ -1,5 +1,21 @@
Revision history for Perl extension Statistics::Descriptive.
+3.0612 2016-01-09
+ - Move the VCS repository to GitHub.
+ - People are more used to it, and it can take part in the CPAN pull-req
+ challenge.
+
+3.0611 2016-01-07
+ - Apply patch from Debian to correct a spelling error.
+ - https://rt.cpan.org/Ticket/Display.html?id=110987
+ - Thanks to Salvatore Bonaccorso for the report and patch.
+
+3.0610 2016-01-06
+ - Clarified the docs for add_data_with_samples().
+ - Some people thought they were repeat counts of the data , but they
+ are normally ignored.
+ - Replace remaining tabs with spaces.
+
3.0609 2015-06-19
- Update some old URLs and addresses.
@@ -175,45 +191,45 @@
2.6 2002-10-10
- Fixed caching in trimmed mean and modified code to allow trimming
- 0% from upper bound. Formerly if 0 was requested then it used the
- lower bound!
+ 0% from upper bound. Formerly if 0 was requested then it used the
+ lower bound!
- - POD format patch from ddunlap
+ - POD format patch from ddunlap
2.5 1999-05-12
- - Forgot to document change in v2.4, which included fixing
- percentile so that it worked right and added to the test
- harness.
- - Modified frequency_distribution so that specific bins could
- be passed in. Fixed caching so that it actually works
- (it only used to get stuck returning the result of the
- first call).
- - Turned off caching for least_squares_fit because there's no
- way to generate a unique key for memorization.
+ - Forgot to document change in v2.4, which included fixing
+ percentile so that it worked right and added to the test
+ harness.
+ - Modified frequency_distribution so that specific bins could
+ be passed in. Fixed caching so that it actually works
+ (it only used to get stuck returning the result of the
+ first call).
+ - Turned off caching for least_squares_fit because there's no
+ way to generate a unique key for memorization.
2.3 1998-11-12
- - Fix for frequency distribution.
- Changed Makefile.PL to ease ActiveState distribution of the module.
- Andrea's code for preventing division by zero and other
- improvements. He also wrote a great test bench.
- Added code from Warren Matthews to calculate percentile.
+ - Fix for frequency distribution.
+ Changed Makefile.PL to ease ActiveState distribution of the module.
+ Andrea's code for preventing division by zero and other
+ improvements. He also wrote a great test bench.
+ Added code from Warren Matthews to calculate percentile.
2.2 1998-02-23
- - Multiple bug fixes:
- Fixed min/max bug with '0' vs defined.
- Provided fix for bug with AUTOLOAD/DESTROY/Carp problem.
+ - Multiple bug fixes:
+ Fixed min/max bug with '0' vs defined.
+ Provided fix for bug with AUTOLOAD/DESTROY/Carp problem.
2.1 1997-09-02
- - Multiple bug fixes:
- Cleaned up syntax error with my scoping.
- Fixed errors in least_squares_fit and median methods
+ - Multiple bug fixes:
+ Cleaned up syntax error with my scoping.
+ Fixed errors in least_squares_fit and median methods
2.00 1997-08-20
- - new version; created by h2xs 1.16
- - Complete rewrite of OO interface by Colin Kuskie.
- - Now has 2 classes instead of 1.5, a base class without data
- storage and a class that inherits the base methods and
- extends them with data storage and more statistics.
+ - new version; created by h2xs 1.16
+ - Complete rewrite of OO interface by Colin Kuskie.
+ - Now has 2 classes instead of 1.5, a base class without data
+ storage and a class that inherits the base methods and
+ extends them with data storage and more statistics.
1.1 1995-04-01
- Added LeastSquaresFit and FrequencyDistribution.
@@ -227,4 +243,4 @@
0.10 1994-12-01
- Initital concept, released to perl5-porters list.
- - Jason Kastner <jkast...@tuba.aix.calpoly.edu>
+ - Jason Kastner <jkast...@tuba.aix.calpoly.edu>
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/META.json
new/Statistics-Descriptive-3.0612/META.json
--- old/Statistics-Descriptive-3.0609/META.json 2015-06-19 09:40:41.000000000
+0200
+++ new/Statistics-Descriptive-3.0612/META.json 2016-01-09 22:55:57.000000000
+0100
@@ -4,7 +4,7 @@
"Shlomi Fish <shlo...@cpan.org>"
],
"dynamic_config" : 1,
- "generated_by" : "Module::Build version 0.421",
+ "generated_by" : "Module::Build version 0.4214",
"keywords" : [
"average",
"distribution",
@@ -52,27 +52,27 @@
"provides" : {
"Statistics::Descriptive" : {
"file" : "lib/Statistics/Descriptive.pm",
- "version" : "3.0609"
+ "version" : "3.0612"
},
"Statistics::Descriptive::Full" : {
"file" : "lib/Statistics/Descriptive.pm",
- "version" : "3.0609"
+ "version" : "3.0612"
},
"Statistics::Descriptive::Smoother" : {
"file" : "lib/Statistics/Descriptive/Smoother.pm",
- "version" : "3.0609"
+ "version" : "3.0612"
},
"Statistics::Descriptive::Smoother::Exponential" : {
"file" : "lib/Statistics/Descriptive/Smoother/Exponential.pm",
- "version" : "3.0609"
+ "version" : "3.0612"
},
"Statistics::Descriptive::Smoother::Weightedexponential" : {
"file" : "lib/Statistics/Descriptive/Smoother/Weightedexponential.pm",
- "version" : "3.0609"
+ "version" : "3.0612"
},
"Statistics::Descriptive::Sparse" : {
"file" : "lib/Statistics/Descriptive.pm",
- "version" : "3.0609"
+ "version" : "3.0612"
}
},
"release_status" : "stable",
@@ -82,8 +82,9 @@
"http://dev.perl.org/licenses/";
],
"repository" : {
- "url" : "https://bitbucket.org/shlomif/perl-statistics-descriptive";
+ "url" : "https://github.com/shlomif/perl-Statistics-Descriptive";
}
},
- "version" : "3.0609"
+ "version" : "3.0612",
+ "x_serialization_backend" : "JSON::PP version 2.27300"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/META.yml
new/Statistics-Descriptive-3.0612/META.yml
--- old/Statistics-Descriptive-3.0609/META.yml 2015-06-19 09:40:41.000000000
+0200
+++ new/Statistics-Descriptive-3.0612/META.yml 2016-01-09 22:55:57.000000000
+0100
@@ -9,7 +9,7 @@
configure_requires:
Module::Build: '0.36'
dynamic_config: 1
-generated_by: 'Module::Build version 0.421, CPAN::Meta::Converter version
2.142060'
+generated_by: 'Module::Build version 0.4214, CPAN::Meta::Converter version
2.150005'
keywords:
- average
- distribution
@@ -27,22 +27,22 @@
provides:
Statistics::Descriptive:
file: lib/Statistics/Descriptive.pm
- version: '3.0609'
+ version: '3.0612'
Statistics::Descriptive::Full:
file: lib/Statistics/Descriptive.pm
- version: '3.0609'
+ version: '3.0612'
Statistics::Descriptive::Smoother:
file: lib/Statistics/Descriptive/Smoother.pm
- version: '3.0609'
+ version: '3.0612'
Statistics::Descriptive::Smoother::Exponential:
file: lib/Statistics/Descriptive/Smoother/Exponential.pm
- version: '3.0609'
+ version: '3.0612'
Statistics::Descriptive::Smoother::Weightedexponential:
file: lib/Statistics/Descriptive/Smoother/Weightedexponential.pm
- version: '3.0609'
+ version: '3.0612'
Statistics::Descriptive::Sparse:
file: lib/Statistics/Descriptive.pm
- version: '3.0609'
+ version: '3.0612'
requires:
Carp: '0'
List::MoreUtils: '0'
@@ -55,5 +55,6 @@
resources:
homepage: http://web-cpan.shlomifish.org/modules/Statistics-Descriptive/
license: http://dev.perl.org/licenses/
- repository: https://bitbucket.org/shlomif/perl-statistics-descriptive
-version: '3.0609'
+ repository: https://github.com/shlomif/perl-Statistics-Descriptive
+version: '3.0612'
+x_serialization_backend: 'CPAN::Meta::YAML version 0.012'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/Makefile.PL
new/Statistics-Descriptive-3.0612/Makefile.PL
--- old/Statistics-Descriptive-3.0609/Makefile.PL 2015-06-19
09:40:41.000000000 +0200
+++ new/Statistics-Descriptive-3.0612/Makefile.PL 2016-01-09
22:55:57.000000000 +0100
@@ -1,4 +1,4 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.4210
+# Note: this file was auto-generated by Module::Build::Compat version 0.4214
require 5.006;
use ExtUtils::MakeMaker;
WriteMakefile
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/README
new/Statistics-Descriptive-3.0612/README
--- old/Statistics-Descriptive-3.0609/README 2015-06-19 09:40:41.000000000
+0200
+++ new/Statistics-Descriptive-3.0612/README 2016-01-09 22:55:57.000000000
+0100
@@ -2,10 +2,10 @@
To install this module, run the following commands:
- perl Build.PL
- ./Build
- ./Build test
- ./Build install
+ perl Build.PL
+ ./Build
+ ./Build test
+ ./Build install
SUPPORT AND DOCUMENTATION
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Statistics-Descriptive-3.0609/inc/Test/Run/Builder.pm
new/Statistics-Descriptive-3.0612/inc/Test/Run/Builder.pm
--- old/Statistics-Descriptive-3.0609/inc/Test/Run/Builder.pm 2015-06-19
09:40:41.000000000 +0200
+++ new/Statistics-Descriptive-3.0612/inc/Test/Run/Builder.pm 2016-01-09
22:55:57.000000000 +0100
@@ -20,7 +20,7 @@
# Make sure we test the module in blib/
unshift @INC, (File::Spec->catdir($p->{base_dir}, $self->blib, 'lib'),
- File::Spec->catdir($p->{base_dir}, $self->blib, 'arch'));
+ File::Spec->catdir($p->{base_dir}, $self->blib, 'arch'));
$self->do_test_run_tests;
}
@@ -66,9 +66,9 @@
return
system(qw(
ctags -f tags --recurse --totals
- --exclude=blib/ --exclude=t/lib
- --exclude=.svn --exclude='*~'
- --languages=Perl --langmap=Perl:+.t
+ --exclude=blib/ --exclude=t/lib
+ --exclude=.svn --exclude='*~'
+ --languages=Perl --langmap=Perl:+.t
));
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive/Smoother/Exponential.pm
new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive/Smoother/Exponential.pm
---
old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive/Smoother/Exponential.pm
2015-06-19 09:40:41.000000000 +0200
+++
new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive/Smoother/Exponential.pm
2016-01-09 22:55:57.000000000 +0100
@@ -4,7 +4,7 @@
use base 'Statistics::Descriptive::Smoother';
-our $VERSION = '3.0609';
+our $VERSION = '3.0612';
sub _new {
my ($class, $args) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive/Smoother/Weightedexponential.pm
new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive/Smoother/Weightedexponential.pm
---
old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive/Smoother/Weightedexponential.pm
2015-06-19 09:40:41.000000000 +0200
+++
new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive/Smoother/Weightedexponential.pm
2016-01-09 22:55:57.000000000 +0100
@@ -5,7 +5,7 @@
use Carp;
use base 'Statistics::Descriptive::Smoother';
-our $VERSION = '3.0609';
+our $VERSION = '3.0612';
sub _new {
my ($class, $args) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive/Smoother.pm
new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive/Smoother.pm
--- old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive/Smoother.pm
2015-06-19 09:40:41.000000000 +0200
+++ new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive/Smoother.pm
2016-01-09 22:55:57.000000000 +0100
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '3.0609';
+our $VERSION = '3.0612';
sub instantiate {
my ($class, $args) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive.pm
new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive.pm
--- old/Statistics-Descriptive-3.0609/lib/Statistics/Descriptive.pm
2015-06-19 09:40:41.000000000 +0200
+++ new/Statistics-Descriptive-3.0612/lib/Statistics/Descriptive.pm
2016-01-09 22:55:57.000000000 +0100
@@ -9,7 +9,7 @@
use vars (qw($VERSION $Tolerance $Min_samples_number));
-$VERSION = '3.0609';
+$VERSION = '3.0612';
$Tolerance = 0.0;
$Min_samples_number = 4;
@@ -18,7 +18,7 @@
use vars qw($VERSION);
-$VERSION = '3.0609';
+$VERSION = '3.0612';
use vars qw(%fields);
use Carp;
@@ -76,15 +76,15 @@
##Define the fields to be used as methods
%fields = (
- count => 0,
- mean => undef,
- sum => undef,
- sumsq => undef,
- min => undef,
- max => undef,
- mindex => undef,
- maxdex => undef,
- sample_range => undef,
+ count => 0,
+ mean => undef,
+ sum => undef,
+ sumsq => undef,
+ min => undef,
+ max => undef,
+ mindex => undef,
+ maxdex => undef,
+ sample_range => undef,
variance => undef,
);
@@ -118,10 +118,10 @@
my $aref;
if (ref $_[0] eq 'ARRAY') {
- $aref = $_[0];
+ $aref = $_[0];
}
else {
- $aref = \@_;
+ $aref = \@_;
}
##If we were given no data, we do nothing.
@@ -131,20 +131,20 @@
if (!defined($min = $self->min()))
{
- $min = $aref->[$mindex = 0];
+ $min = $aref->[$mindex = 0];
}
else
{
- $mindex = $self->mindex();
+ $mindex = $self->mindex();
}
if (!defined($max = $self->max()))
{
- $max = $aref->[$maxdex = 0];
+ $max = $aref->[$maxdex = 0];
}
else
{
- $maxdex = $self->maxdex();
+ $maxdex = $self->maxdex();
}
$sum = $self->sum();
@@ -153,17 +153,17 @@
##Calculate new mean, sumsq, min and max;
foreach ( @{ $aref } ) {
- $sum += $_;
- $sumsq += $_**2;
- $count++;
- if ($_ >= $max) {
- $max = $_;
- $maxdex = $count-1;
- }
- if ($_ <= $min) {
- $min = $_;
- $mindex = $count-1;
- }
+ $sum += $_;
+ $sumsq += $_**2;
+ $count++;
+ if ($_ >= $max) {
+ $max = $_;
+ $maxdex = $count-1;
+ }
+ if ($_ <= $min) {
+ $min = $_;
+ $mindex = $count-1;
+ }
}
$self->min($min);
@@ -213,7 +213,7 @@
$self->_variance($variance);
# Return now to avoid re-entering this sub
- # (and therefore save time when many objects are used).
+ # (and therefore save time when many objects are used).
return $variance;
}
@@ -238,7 +238,7 @@
use vars qw($VERSION);
-$VERSION = '3.0609';
+$VERSION = '3.0612';
use Carp;
use POSIX ();
@@ -1162,9 +1162,20 @@
=item $stat->add_data_with_samples([{1 => 10}, {2 => 20}, {3 => 30},]);
-Add data to the statistics variable and set the number of samples each value
has been
-built with. The data is the key of each element of the input array ref, while
-the value is the number of samples: [{data1 => smaples1}, {data2 => samples2},
...]
+Add data to the statistics variable and set the number of samples each value
+has been built with. The data is the key of each element of the input array
+ref, while the value is the number of samples: [{data1 => smaples1}, {data2 =>
+samples2}, ...].
+
+B<NOTE:> The number of samples is only used by the smoothing function and is
+ignored otherwise. It is not equivalent to repeat count. In order to repeat
+a certain datum more than one time call add_data() like this:
+
+ my $value = 5;
+ my $repeat_count = 10;
+ $stat->add_data(
+ [ ($value) x $repeat_count ]
+ );
=item $stat->get_data();
@@ -1193,7 +1204,8 @@
Set the function to filter out the outlier.
-C<$code_ref> is the reference to the subroutine implemeting the filtering
function.
+C<$code_ref> is the reference to the subroutine implementing the filtering
+function.
Returns C<undef> for invalid values of C<$code_ref> (i.e.: not defined or not a
code reference), C<1> otherwise.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/scripts/tag-release.pl
new/Statistics-Descriptive-3.0612/scripts/tag-release.pl
--- old/Statistics-Descriptive-3.0609/scripts/tag-release.pl 2015-06-19
09:40:41.000000000 +0200
+++ new/Statistics-Descriptive-3.0612/scripts/tag-release.pl 2016-01-09
22:55:57.000000000 +0100
@@ -17,7 +17,7 @@
}
my @cmd = (
- "hg", "tag", "-m",
+ "git", "tag", "-m",
"Tagging the Statistics-Descriptive release as $version",
"releases/$version",
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/t/00-load.t
new/Statistics-Descriptive-3.0612/t/00-load.t
--- old/Statistics-Descriptive-3.0609/t/00-load.t 2015-06-19
09:40:41.000000000 +0200
+++ new/Statistics-Descriptive-3.0612/t/00-load.t 2016-01-09
22:55:57.000000000 +0100
@@ -3,7 +3,7 @@
use Test::More tests => 1;
BEGIN {
- use_ok( 'Statistics::Descriptive' );
+ use_ok( 'Statistics::Descriptive' );
}
diag( "Testing Statistics::Descriptive $Statistics::Descriptive::VERSION, Perl
$], $^X" );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Statistics-Descriptive-3.0609/t/quantile.t
new/Statistics-Descriptive-3.0612/t/quantile.t
--- old/Statistics-Descriptive-3.0609/t/quantile.t 2015-06-19
09:40:41.000000000 +0200
+++ new/Statistics-Descriptive-3.0612/t/quantile.t 2016-01-09
22:55:57.000000000 +0100
@@ -23,7 +23,7 @@
581, 554, 765, 580, 626, 510, 533, 495, 470, 713, 571, 573, 476, 526,
441, 431, 686, 563, 496, 447, 518
);
-my @data3 = qw/-9 2 3 44 -10 6 7/;
+my @data3 = qw/-9 2 3 44 -10 6 7/;
my %DataTest = (
'First sample test' => {
