diff options
Diffstat (limited to 'contrib/nvi/perl_scripts/wc.pl')
-rw-r--r-- | contrib/nvi/perl_scripts/wc.pl | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/contrib/nvi/perl_scripts/wc.pl b/contrib/nvi/perl_scripts/wc.pl deleted file mode 100644 index 0a50159..0000000 --- a/contrib/nvi/perl_scripts/wc.pl +++ /dev/null @@ -1,11 +0,0 @@ -sub wc { - my $words; - $i = $VI::StartLine; - while ($i <= $VI::StopLine) { - $_ = $curscr->GetLine($i++); - $words+=split; - } - $curscr->Msg("$words words"); -} - -1; |