topic Re: Perl question in Operating System - HP-UX

Perl question

Kris_5 — Tue, 18 Nov 2003 18:03:38 GMT

Dear All,

I am trying to search for a string and replace with another in a perl script. The search string can be "clin" or "clin2" and replace string is "clin2".

Here is the example
$repl_str=clin2
$dir=/opt/data/clin/0001/view
# Search for clin? and replace clin with the replace string.
$dir =~ s/clin?/$repl_str/g;
### resulting value of $dir is /opt/data/clin2/0001/view which is O.K.

But it fails for scenario 2.
$repl_str=clin2
$dir=/opt/data/clin2/0001/view
# Search for clin? and replace clin with the replace string.
$dir =~ s/clin?/$repl_str/g;
### resulting value is $dir=/opt/data/clin22/0001/view,
but I expected the value as
/opt/data/clin2/0001/view.

Could some body help in modifying the search command. TIA

Kris

Re: Perl question

curt larson_1 — Tue, 18 Nov 2003 19:38:47 GMT

the n? in clin? will match zero or 1 n.
that means it will match cli and clin.
your pattern should be clin.?

Re: Perl question

H.Merijn Brand (procura — Wed, 19 Nov 2003 03:58:05 GMT

not clin.? but clin2?

the . will match anything but a newline, which also includes slashes, which is not what you want. 2? means zero ore one literal 2

Enjoy, have FUN! H.Merijn