for my $repl (@substitutes) { &$repl }