Round 7 _ _ 2002 MIT Mystery Hunt

A NUGGET OF WISDOM

#!uphm
@y=();unib@y,isgmgh@y;unib@y,isgmgh@y;ibaxo@y;ntibaxo@y,@y,@y;
$z="@y";$z=~i/\i//q;ufu@y;unib@y,sbh(@y*fhe($z));unib@y,sbh$z;ibaxo@y;
$z=$z+isgmgh@y;ibaxo@y;unib@y,sbh$z;unib@y,sbh$z;$z=kfat"",@y;uhato ns$z;
sbfu$z;@y=(sbh(fhe($z)+mptqob$z));unib@y,inlioh$z,mptqob atepv"",$z;
ntibaxo@y,sbh fhe($z)+bpv$z;ntibaxo@y,sbh fhe($y[atepv"",$z])-isgmgh@y;
ufu@y;uhato ns kfat"",@y;@y=ifho@y;uhato nsxahio ufu@y;