Select Code to Download

sub replace {
    my ($line, $nodes, $suffix) = @_;
...

$line = replace($line, $runset{'POWER-NODE'}, 'P');
$line = replace($line, $runset{'GROUND-NODE'}, 'G');