for ( $sysDescr ) { s/$prefixSysDescr|$prefixSnmpWalk/$hostName$TAB/ && do { $OutputLine = $_; last; }; # substitute some prefixes $OutputLine = $OutputLine . $SPACE . $_; } # process output