L
Larry Brasfield
Robert Monsen said:This script doesn't work as advertised using perl under cygwin (suprise). What version of perl is it targeted towards? If you send
me some sample output, I'll take a look. It's probably something simple.
Thanks for the report and offer. While I mentioned
the ActiveState distro, I am actually using the cygwin
version here. To wit (with extranea cut):
This is perl, v5.8.6 built for cygwin-thread-multi-64intset | findstr .pl= .pl=perl
perl -v
What version are you using? I will be happy to find
and fix the problem if I can replicate it (or if you want
to send me its blurp via email). And if your difficulty
reflects a shortcoming in the admittedly sparse "help",
I will be more than happy to fix that. I wrote that
script for my own purposes, so it probably has plenty
of room for improvement in a wider context.
Here is a simple session that "should" replicate, with a newline
inserted after certain commas for legibility and the prompt reduced:
=========== begin near screen scrape ===============
Usage:perl \bin\stdvals.pl
stdvals tolerance
or
stdvals tolerance value [2a|2p|2r]
or
stdvals -n decsplit
Standard tolerances are: 1% 10% 20% 5% 50%
Standard decade splits are: 12 24 3 6 96
Approximate 5.88e-10 with (5.6e-10 + 2.7e-11),perl \bin\stdvals.pl 5% 588p 2a
yielding 5.87e-10 (ratio = 1.0017)
Approximate 63540 as 1(1/66500 + 1/1.43e+06),perl \bin\stdvals.pl 1% 63.54k 2p
yielding 63544.9 (ratio = 1.0001)
1.0 1.2 1.5 1.8 2.2 2.7 3.3 3.9 4.7 5.6 6.8 8.2perl \bin\stdvals.pl 1% 63.54k 63400
perl \bin\stdvals.pl 10%
Standard 1% values:perl \bin\stdvals.pl -n 96
1.00 1.02 1.05 1.07 1.10 1.13 1.15 1.18 1.21 1.24 1.27 1.30
1.33 1.37 1.40 1.43 1.47 1.50 1.54 1.58 1.62 1.65 1.69 1.74
1.78 1.82 1.87 1.91 1.96 2.00 2.05 2.10 2.15 2.21 2.26 2.32
2.37 2.43 2.49 2.55 2.61 2.67 2.74 2.80 2.87 2.94 3.01 3.09
3.16 3.24 3.32 3.40 3.48 3.57 3.65 3.74 3.83 3.92 4.02 4.12
4.22 4.32 4.42 4.53 4.64 4.75 4.87 4.99 5.11 5.23 5.36 5.49
5.62 5.76 5.90 6.04 6.19 6.34 6.49 6.65 6.81 6.98 7.15 7.32
7.50 7.68 7.87 8.06 8.25 8.45 8.66 8.87 9.09 9.31 9.53 9.76
Standard 20% values:perl \bin\stdvals.pl -n 6
1.0 1.5 2.2 3.3 4.7 6.8
=========== end near screen scrape ===============