#!perl -lapF
$_=chr unpack("%c*")/@F