File Coverage
File:
strip-word-collator-suffix.pl
Coverage:
100.0%
line
stmt
bran
cond
sub
time
code
1
#!/usr/bin/env perl
2
3
2131222
while (<>) {
3
8
22
s/ \(.*//;
4
8
21
print;
5
}