| Apache/2.4.7 (Ubuntu) Linux sman1baleendah 3.13.0-24-generic #46-Ubuntu SMP Thu Apr 10 19:11:08 UTC 2014 x86_64 uid=33(www-data) gid=33(www-data) groups=33(www-data) safemode : OFF MySQL: ON | Perl: ON | cURL: OFF | WGet: ON > / usr / share / bash-completion / completions / | server ip : 104.21.89.46 your ip : 172.69.130.116 H O M E |
| Filename | /usr/share/bash-completion/completions/cpan2dist |
| Size | 1.21 kb |
| Permission | rw-r--r-- |
| Owner | root : root |
| Create time | 27-Apr-2025 09:54 |
| Last modified | 07-Apr-2014 22:10 |
| Last accessed | 05-Jul-2025 20:35 |
| Actions | edit | rename | delete | download (gzip) |
| View | text | code | image |
# bash completion for cpan2dist -*- shell-script -*-
_cpan2dist()
{
local cur prev words cword
_init_completion || return
case $prev in
--format)
# should remove ":" from COMP_WORDBREAKS, but doesn't work (?)
COMPREPLY=( $( compgen -W '$(perl -MCPANPLUS::Dist -e \
"print map { \"\$_\n\" } CPANPLUS::Dist->dist_types")' \
-- "$cur" ) )
return 0
;;
--banlist|--ignorelist|--modulelist|--logfile)
_filedir
return 0
;;
esac
if [[ "$cur" == -* ]]; then
COMPREPLY=( $( compgen -W '$( _parse_help "$1" )' -- "$cur" ) )
else
local cpandirs=( "$HOME/.cpanplus/" "$HOME/.cpan/source/modules/" )
local packagelist
for dir in ${cpandirs[@]}; do
[[ -d "$dir" && -r "$dir/02packages.details.txt.gz" ]] && \
packagelist="$dir/02packages.details.txt.gz"
done
[[ $packagelist ]] && COMPREPLY=( $( zgrep "^${cur//-/::}" \
$packagelist 2>/dev/null | awk '{print $1}' | sed -e 's/::/-/g' ) )
fi
} &&
complete -F _cpan2dist -o default cpan2dist
# ex: ts=4 sw=4 et filetype=sh
_cpan2dist()
{
local cur prev words cword
_init_completion || return
case $prev in
--format)
# should remove ":" from COMP_WORDBREAKS, but doesn't work (?)
COMPREPLY=( $( compgen -W '$(perl -MCPANPLUS::Dist -e \
"print map { \"\$_\n\" } CPANPLUS::Dist->dist_types")' \
-- "$cur" ) )
return 0
;;
--banlist|--ignorelist|--modulelist|--logfile)
_filedir
return 0
;;
esac
if [[ "$cur" == -* ]]; then
COMPREPLY=( $( compgen -W '$( _parse_help "$1" )' -- "$cur" ) )
else
local cpandirs=( "$HOME/.cpanplus/" "$HOME/.cpan/source/modules/" )
local packagelist
for dir in ${cpandirs[@]}; do
[[ -d "$dir" && -r "$dir/02packages.details.txt.gz" ]] && \
packagelist="$dir/02packages.details.txt.gz"
done
[[ $packagelist ]] && COMPREPLY=( $( zgrep "^${cur//-/::}" \
$packagelist 2>/dev/null | awk '{print $1}' | sed -e 's/::/-/g' ) )
fi
} &&
complete -F _cpan2dist -o default cpan2dist
# ex: ts=4 sw=4 et filetype=sh