Perl

Platform: rev-kids20.forkbomb.ru | Category: Reversing | Type: Challenge | Difficulty: Easy | OS: NA | Author: XESXOR | Date: 2026-03-09 | Status: Solved Techniques: base64_decode, eval_deobfuscation

Summary

Language: Perl. Source code provided. Obfuscated Perl script using base64-encoded eval.

Perl — Reverse Kids 2.0

Description

Language: Perl. Source code provided. Obfuscated Perl script using base64-encoded eval.

Analysis

Source code:

 perl read-only • copy allowed Copy
#!/usr/bin/env perl
use MIME::Base64;
print eval decode_base64('JGE9PD47IGlmICgkYSA9fiAicGVybHVzX2ZsYWd1cyIpeyJPa2F5X2l0KWlzX2ZpcnN0X3N0YWdlX2ZsYWcifWVsc2V7Ildvdywgbm9vIn0=');

Decoding the base64:

 perl read-only • copy allowed Copy
$a=<>; if ($a =~ "REDACTED"){"Okay_it)is_first_stage_flag"}else{"Wow, noo"}

The code reads input and checks if it contains the string "REDACTED". ‍​‌‌​​​​‌​‌‌​​‌‌​​‌‌​​‌‌​​‌‌​​‌​​​​‌‌​​​​​‌‌​​‌‌​​‌‌​​‌​‌​‌‌​​‌​‌‍

Solution

The flag is the string that passes the check: REDACTED. ‍​‌‌​​​​‌​‌‌​​‌‌​​‌‌​​‌‌​​‌‌​​‌​​​​‌‌​​​​​‌‌​​‌‌​​‌‌​​‌​‌​‌‌​​‌​‌‍