«

Hi,

I want to introduce a special character ( \ ) in a string using perl script.
(i.e) "" has to be converted into "first.last\@mail.com".
Please help me.

Regards,
Arunkumar

"Arun Kumar" <> wrote in message
news: m...
> I want to introduce a special character ( \ ) in a string using perl
script.
> (i.e) "" has to be converted into
"first.last\@mail.com".
> Please help me.

Have you read any documentation or tutorials about regular expressions?
That would be a very good place to start:

perldoc perlretut

Specifically, you want to use the search-and-replace operators s///.

If you have read it and understand regular expressions, please post a
short but complete piece of code demonstrating what you've tried so far
and how it has failed to function as you'd like it to.

Paul Lalli

Arun Kumar wrote:
> Hi,
>
> I want to introduce a special character ( \ ) in a string using perl script.
> (i.e) "" has to be converted into "first.last\@mail.com".
> Please help me.

The answer depends upon the question:
Why would you need it?

If you need it because perl complains about "Possible unintended
interpolation of @mail in string", then just insert the backslash
character using your favorite editor.

If you _think_ you need the backslash because the @ is a special
character and you _think_ that perl might get confused: it won't. If you
read "" from some place (e.g. STDIN, some file), then
the @ won't be regarded as a special character any more. Introducing a
backslash will only introduce one more character, a character you don't
really want.

If you still are convonced you need the backslash:

$s = '';
$s =~ s/\@/\\$&/;

HTH,

Josef
--
Josef Möllers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett