V(qw/74 401 211 79/);sub V{while(@_){$v**=$V?$#_:$V;
print(map{$V<$v?chr(shift):chr(reverse(pop))}$_),$V+=$#_%2!=1?1:0}}