Try out this,

my $stuff = '*****STAFF*****';
$stuff =~ s/\*//g; 
Print $stuff; 

Regards,
Rajnikant Jachak 

-----Original Message-----
From: John W. Krahn [mailto:[EMAIL PROTECTED] 
Sent: Thursday, July 03, 2008 10:38 AM
To: Perl Beginners
Subject: Re: removing '*' from *****STAFF*****

Manasi Bopardikar wrote:
> Does anyone know how do I remove the beginning and the trailing * from
> *****STAFF*****

my $stuff = '*****STAFF*****';

s/^\*+//, s/\*+$// for $stuff;


Or if you want to remove all * regardless of where in the string they are
located:

$stuff =~ tr/*//d;



John
--
Perl isn't a toolbox, but a small machine shop where you can special-order
certain sorts of tools at low cost and
in short order.                            -- Larry Wall

--
To unsubscribe, e-mail: [EMAIL PROTECTED] For additional
commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/



DISCLAIMER
==========
This e-mail may contain privileged and confidential information which is the 
property of Persistent Systems Ltd. It is intended only for the use of the 
individual or entity to which it is addressed. If you are not the intended 
recipient, you are not authorized to read, retain, copy, print, distribute or 
use this message. If you have received this communication in error, please 
notify the sender and delete all copies of this message. Persistent Systems 
Ltd. does not accept any liability for virus infected mails.

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to