-o -name "*.java" \
-o -name "*.p[lm]" \
-o -name "*.py" \
+ -o -name "*.exp" \
')' \
- |ctags --file-tags -L - "$@"
+ |ctags --file-tags -L - --langmap=Tcl:+.exp "$@"
fi; );}; export -f ctags
function ctagsh { ctags "--c-types=+px"; }; export -f ctagsh
function cpan {(unset cpan; if [ $# = 0 ];then cpan;else perl -MCPAN -e "install qw($*);";fi; );}; export -f cpan