sub e {
    my ( $s, $w, $x, $y, $z, $c ) = (
        (
            join '',
            map { chr }
              6 * 6 * 3 + 6 + 1,
            6 * 6 * 3 + 6 + 1 -
              3,
            6 * $= * 3 + 6 + 1 - 3 + 2,
            6 * 6 * 3 - 3,
            $= * 6 * 3 - 3 + 3 + 2,
            6 * 6 * 3 + $, * 3 + 2,
            6 * 6 * 3 - 6,
            6 * 6 - 2 - 2,
            6 * 6 * 3 + 6 - 1,
            2**( 6 + 1 ) - 3 - 1,
            6 * 6 + 1,
            6 * 6 * 3 + 6 + 1,
            6 * 6 + 1,
            6 * 6 * 3 + 6 + 1,
            6 * 6 + 1,
            6 * 6 * 3 + 6 + 1,
            2**( 6 + 1 ) - 3 - 1,
            6 * 6 + 2**3,
            6 * 6,
            6 * 6 * 3 + 2 * 3 + 2 *
              3,
            6 * 6 + 2**3,
            6 * 6 * 3 + 6 - 1,
            2**( 6 + 1 ) - 3 - 1,
            6 * 6 * 3 - 3 - 2 - 2,
            2**( 6 + 1 ) - 3 - 1,
            6 * 6 + 2**3,
            6 * 6,
            $= * 6 * 3 + 2 * 3 + 2 * 3 +
              1
        ),
        @_
    );

    $s =~ s/(.+)/$1/ee;
    0 + $s;
}
print chr for(
    join '',
    do { 1 ^ 1 },
    do {
        $- = e $;+ 1, $= + $., 3 + $., $= + 1, 2;
        $- += e 1 ^ 1, $; + $., 3, $= + $,,
          $= + 2;
        $- += e 1 ^ 1, 1, $,,
          $= * $; + $, * 2, 6 + $;;
        $- += e rand, 6 * $, + $= - $., 1 ^ 1,
          1 ^ 1,
          2 + 6 * 2 - 1;
        $-;
    },
    do {
        $- = e rand, 1, 3 + $., 3 + 6 * 2,
          6 * 3 - 3;
        $- += e 1 ^ 1, 1, 3,
          6 * 3 * 6 + 1, 3 + $.;
        $- += e 1 ^ 1, $= - $., $,, $= - 1,
          3 * 6 * 3 + 3;
        $- += e rand, 1, 1, 3,
          6 + 6 * 3 - 1;
      $- += e 1 ^ 1, 1, 1 ^ 1, $,;
        $-;
    },
    do {
        2 * 6 * 3 * 2 - 6 * 2;
    },
    do {
        $- = e 1 ^ 1,
          6**3 + 6**2 * 3 -
          2**2, $,,
          2 + 1 + 6 * 3;
        $- += e rand,
          6**2 - 3 + 3**( 2 * 2 ) -
          3 * 3 * 2 + 1, 1 ^ 1,
          1 ^ 1, 1 ^ 1;
        $-;
    },
    do {
        $- = e 1 ^ 1, 1, 3, $=, $,;
        $- += 2**6 + 6**2 + 3 - 2;
        $-;
    },
    do {
        2 + 2**6 + 6**2 + 3**2;
    },
    do { 1; },
    do {
        6;
    },
    do {
        $- = e 6 * 6 - 2,
          -1 + 3**( 2 * 2 ) + 3 * 6 +
          6, 3, $= * $, + $= - $.,
          3**2**2 + 6;
        $- += 6 * 3 + 2 + 3**2**2;
        $-;
    },
    do {
        $- = e 1 ^ 1,
          6**3 - 3**( 2 * 2 ) -
          2**( 2 * 2 ) - 3 * 2 +
          1, 2, 2**6 + 1,
          3 * 3 * 3 + 2 * 2 * 2;
        $- += 3;
        $-;
    },
    do {
        6 * 3 * 6 * 3 * 6 -
          6**( 2 * 2 ) + 1 +
          3**6 + 6 * 2 * 6 -
          3 * 3 * 2 + 6 * 6 *
          3 * 6;
    },
    do { -6 + 6 * 6 * 3 - 1; },
    do {
        $- = e 6 + 3 + 2, 2 + 3 + 6,
          3, 2 + 6 + 3,
          3 + 6 + 2;
        $- += e rand, 6 * 6 + 3 + 2, 1,
          6 + 3, 2**6 - 2**3 *
          2**2;
        $-;
    },
    do {
        $- = e rand,
          0 - 6 + 6**3 * ( 2 * 2 ) + 1 -
          2 - 3**3 * 2, 1;
        $- += $,;
        $-;
    },
    do {
        $- = e $,,
          -2 * 2 + 3 * 3 * 2 *
          3 * 2, 2,
          2**( 2 * 2 ) * 6 -
        2**( 2 * 2 ),
          -( 2 * 2 ) - 2**( 2 * 2 ) +
          6 * 2**( 2 * 2 );
        $- += 6 + 3;
        $-;
    },
    do {
        $- = e 3,
          3 * 3 * 6 + 2**( 2 * 2 ),
          $= - $., 2 + 3 * 1 * 2 * 3 + 2 *
          3, 3;
        $- +=
          e 1 + 3**( 2 * 2 ) +
          2**( 2 * 2 ) + 1,
          2**6 - 1 + 2 * 3 * 3 +
          6 * 3, 3,
          2 * 6 * 6 + 6 * 2 + 1,
          -6 + 2 * 6 + 2 * 6 *
          6 + 1;
        $- += e 1, 1, $,, 6 * 6 - 1,
          $= + $.;
        $- += e 6 + 1, $= + $., 1 ^ 1,
          2**( 3 + 2 ) + 6 * 3 - 1,
          6 * 3 + 2 * 3;
        $-;
    },
    do {
        -6 * 2 - 1 + 2**3**2 *
          2;
    },
    do {
        $- = e 1 ^ 1, 1, 3 + 1,
          -1 + 2 * 3**3 - 1,
          2 * 3 * 2;
        $- += e 6 * 6 + 2 + 2,
          2 + 2 + 6 * 6, $,,
          1 + 2 * 3 * 2,
          3 * 6 + 2;
        $- += e 6 * 2 + 6 - 1,
          6 * 6 + 6 + 2,
          1 ^ 1, rand, $= + 1;
        $- + 1 ^ 1;
    }