note GotToBTru You never introduce the | character. I would suggest replacing: <code> print $reg_exp; </code> with <code> $accum .= "$reg_exp,"; </code> and then when ready to output your pipe delimited expression: <code> $accum =~s/,$//; $accum =~ s/,/|/g; print $accum; </code> 1017681 1017681