#!perl -lpaF
$_=chr 1/@F*unpack'%A*'