#!/usr/bin/perl -w
$_=++$.;$_+=$_;$_*=$_;$;=$_;$;.='a'.$_;$;.=$.;$;.=$_+$.;
$;.=--$.;$;.=$_;$_+=$_;$;.=$_;$.++;$_/=++$.;$;.=$.;$;.=
--$.;$;.=--$.;$;.='a';$_=$;;print+pack'H*'=>$_;