+export PERL_MM_OPT="PREFIX=$HOME"
+export WWW_HOME="file:///home/short/.bookmarks.html"
+
+function cvsdiff { cvs diff "$@" 2>&1| less; }; export -f cvsdiff
+function cvsdiffi { cvs diff "$@" 2>&1|grep -v '^?'|less; }; export -f cvsdiffi
+function cvsupdate { cvs update "$@" 2>&1| less; }; export -f cvsupdate
+function cvsupdatei { cvs update "$@" 2>&1|grep -v '^?'|less; }; export -f cvsupdatei
+
+function wclines { awk '{x[$0]++}END{for (i in x) print x[i]"\t"i}'; }; export -f wclines