#!/usr/bin/perl
eval join '',map{chr}unpack"A3"x171,q/115117098032095123112114105110116032036095091048093046036047125059036109061039109111110107101121039059036115061039116114105110103039059059095034080108101097115101032101110116101114032116104101032115036115032116111032098101032115101097114099104101100032102111114032116104101032115036115032039036109039058034059036095061060062033126047036109047063039032110111116039058039039059095034083036115032039036109039032119097115034046036095046034032102111117110100032105110032116104101032105110112117116032115036115046034059/;

##</code><code>##

sub _{print $_[0].$/};