@replacehash{ map{ "TEMP$_" } 1 .. 2 } = 
    map{ 
      use List::Util 'reduce';
      reduce {$a->$b} ($flow, split /->/, $_);
    } qw[getExeName getTempName getData->getNameType];