$whatisit = system "whatis grep";
$whatisit =~ s/.*-//;
print $whatisit;