$              }=sub{ 
print chr shift}  and
map$   _    ->      $
}     ,74,65,80,72,44