Select Code to Download

package r;
use strict;
...
}

1;

[me@host]$ cat `find d* -type f` | wc -l  
  58040
[me@host]$ perl -mr -lne '$x++; END{print $x}' d*
58040
[me@host]$

------------
:Wq
Not an editor command: Wq