#! /usr/bin/perl
$~=~s~o~unpack qq,\l$',,q,:<')I;G0@(E1H92!097)L($IO=7)N86Q<;B(`,~eei
