You could simply do:
$test = '#1 aba baba'; $test =~ s/#1/# 1/g; print "$test\n"; [download]
In reply to Re: (OT) Regular Expression by mickep76 in thread (OT) Regular Expression by Sun751