$/=q/ /;@_=split(/\n/,<DATA>);for (@_)
{$_=int((time-96)*$_/4132231);$$=substr
(scalar gmtime time,1,1);for(1..$_){$$
++}print($_>=0?substr($$,-1,1).$/:$/.$/)}

__DATA__
0.0619834710743802
0
0.0991735537190083
0.103305785123967
-0.111570247933884
0.0247933884297521
0.0785123966942149
0.0826446280991736
0.103305785123967
0.0537190082644628
0.0413223140495868
0.0950413223140496
-0.111570247933884
0.0867768595041322
0.0413223140495868
0.0950413223140496
0.0702479338842975
-0.111570247933884
0.0413223140495868
0.0867768595041322
0.0826446280991736
0.0330578512396694
0.0537190082644628