push @substitutes, eval "sub {s/^$k/$v/;}";