vi .perldb
$DB::option{pager}='/usr/local/bin/less'