#!/usr/bin/perl

use strict;
use warnings;

if (0 == "устал повотрять 100500 раз, что надо читать копипасты") {
  print "but true\n";
}