# Pastebin Q69mkVqM
m: my %tm = <% percent # hash - dash . dot ? question>;
sub english-for-tokens {
  $^a.comb.map({ %tm{$_} ?? "-%tm{$_}-" !! $_ })
     .join.subst(/'--'/, '-', :g)
     .subst: /^\-|\-<before \s>|<after \s>\-|\-$/, '', :g
};
say english-for-tokens('%" .x, #?#, . ?, and -');