55 lines
1.5 KiB
YAML
55 lines
1.5 KiB
YAML
id: privesc-perl
|
|
|
|
info:
|
|
name: Perl - Privilege Escalation
|
|
author: daffainfo
|
|
severity: high
|
|
description: |
|
|
Perl is a high-level, general-purpose programming language known for its powerful text processing capabilities. It is often used for system administration, web development, and network programming. Perl's syntax and features make it well-suited for tasks such as parsing and manipulating text, making it a popular choice for various scripting and automation tasks.
|
|
reference:
|
|
- https://gtfobins.github.io/gtfobins/perl/
|
|
metadata:
|
|
verified: true
|
|
tags: code,linux,perl,privesc
|
|
|
|
self-contained: true
|
|
code:
|
|
- engine:
|
|
- sh
|
|
- bash
|
|
source: |
|
|
whoami
|
|
|
|
- engine:
|
|
- sh
|
|
- bash
|
|
source: |
|
|
perl -e 'exec "whoami";'
|
|
|
|
- engine:
|
|
- sh
|
|
- bash
|
|
source: |
|
|
sudo perl -e 'exec "whoami";'
|
|
|
|
- engine:
|
|
- sh
|
|
- bash
|
|
source: |
|
|
perl -e 'use POSIX qw(setuid); POSIX::setuid(0); exec "whoami";'
|
|
|
|
matchers-condition: and
|
|
matchers:
|
|
- type: word
|
|
part: code_1_response
|
|
words:
|
|
- "root"
|
|
negative: true
|
|
|
|
- type: dsl
|
|
dsl:
|
|
- 'contains(code_2_response, "root")'
|
|
- 'contains(code_3_response, "root")'
|
|
- 'contains(code_4_response, "root")'
|
|
condition: or
|
|
# digest: 490a0046304402200a093cb0aa2ec75dfb33f02dc087b501b5f6187d60468a6c67db3cddffc095d30220078ba7495f4c1a33103ce617214ba05d89845fd6941672e576ab45a8a1cb89d8:922c64590222798bb761d5b6d8e72950 |