perl -le 'use LWP::Simple; use Mail::Sendmail; for ( keys %INC ) { print $INC{$_} if m!/(Simple|Sendmail)!}'