My father is an extensive Perl user, which still is somewhat of a mystery to me. But it seems to be a language very much suited for IT related tasks.
You can convert an IP to its hex representation and change a symlink in one line. That's a superpower.
Cramming things in one line can sometimes be neat but Perl took that concept and went bananas, and now Perl has because the punchline to many jokes, justified or not.
$hexip = sprintf("%02X%02X%02X%02X",split('\.',$ip));
system ("cd <REDACTED_PATH>; ln -fs $boothd $hexip");
I think, in this case, perl being hard to understand is the joke itself.