1
75%
master: 62%

Ran 29 Jan 2024 05:38AM UTC

Files 3

Run time 0s

Badge

Embed ▾

Committed 29 Jan 2024 05:32AM UTC coverage: 75.05%. Remained the same

Job # 7691647715.1

Build Type

push

github

Committed by

web-flow

Commit Message

wc: terminate options with --

* Not all commands know about "--" yet
* Conversion to Getopt::Std is simple for wc because options are all single letter flags
* Remove differences for MacPerl which likely don't matter anymore (Getopt::Std will work on OSX perl)
* test1: "perl wc -c -- -c" --> process a file called "-c"
* test2: compare output of GNU version (below); different count for -w flag was present in previous versions

%for opt in c l m w; do echo "GNU -$opt"; wc -${opt} awk; echo "PPT -$opt"; perl wc -${opt} awk; echo; done
GNU -c
4595 awk
PPT -c
      4595 awk

GNU -l
204 awk
PPT -l
       204 awk

GNU -m
4595 awk
PPT -m
       204       675      4595      4595 awk

GNU -w
701 awk
PPT -w
       675 awk

Coverage Stats

373 of 497 relevant lines covered (75.05%)

4531.85 hits per line

mknos / PerlPowerTools / 7691647715 / 1
75%
master: 62%

README BADGES
x

Markdown

Textile

RDoc

HTML

Rst

Source Files on job 7691647715.1

mknos / PerlPowerTools / 7691647715 / 1 75% master: 62%

README BADGES x

Markdown

Textile

RDoc

HTML

Rst

Source Files on job 7691647715.1

mknos / PerlPowerTools / 7691647715 / 1
75%
master: 62%

README BADGES
x