#!perl -p
s@//@#@||s/    |.*//+s/[abi]\W/\$$&/g;s;^int;my