print {$FILE} pack 'C', $_ for @arr;