# list all modules on my disk that have newer versions on CPAN for $mod (CPAN::Shell->expand("Module","/./")){ next unless $mod->inst_file; next if $mod->uptodate; printf "Module %s is installed as %s, could be updated to %s from CPAN\n", $mod->id, $mod->inst_version, $mod->cpan_version; } #### perl -MCPAN -e 'for $m (CPAN::Shell->expand("Module","/./")){printf "%s %s (%s)\n",$m->id,$m->inst_version,$m->cpan_version if $m->inst_file}'