#!perl -pl
$_=y/a-z//+y/dg//+2*y/bcmp//+3*y/fhvwy//+4*y/k//+7*y/jx//+9*y/qz//