1 files changed, 11 insertions, 0 deletions
diff --git a/.bash_profile b/.bash_profile
index 47aae0f..c3d4e4a 100644
--- a/.bash_profile
+++ b/.bash_profile
@@ -21,5 +21,16 @@ function se() {
     emacsclient "${@/#//sudo::}"
 }
 
+function pm() {
+    local fn
+    local ex
+    fn="$(perldoc -l "$1")"
+    ex=$?
+    if [[ $ex != 0 ]]; then
+        return $ex
+    fi
+    emacsclient -c -n "$fn"
+}
+
 fortune