#!perl -p061aF
$_=/0/?$":chr@F-61+25/8*ord