suport pear in check_installed

define check_installed_by_pear
Usage: it { should be_installed.by('pear') }