Help for this page
use strict; use warnings; ... split m{,}, $str; print qq{@result\n};
a=>fn(a) b=>c e=>fn(f) ???