$TEXT =~ /abc/g;
$TEXT =~ s/\G(\D+)([\d\.\-]*)/$1GOVALUE/g;