[Israel.pm] another regexp Q

VladimirB at ladpc.co.il VladimirB at ladpc.co.il
Thu Oct 18 04:55:07 PDT 2007


Well, it tested by me and work properly with perl, v5.8.7 built for MSWin32-x86-multi-thread
$a="ssadfaaadkjfhhh";
print "$a\n";
$a=~s /(.)\1+/$1/g;
print $a;


Vladimir M. Bronfman
Development Department
LADPC Inc
Israel
www.ladpc.co.il/eng

-----Original Message-----
From: perl-bounces at perl.org.il [mailto:perl-bounces at perl.org.il] On Behalf Of Ernst, Yehuda
Sent: Wednesday, October 17, 2007 9:04 AM
To: perl at perl.org.il
Subject: [Israel.pm] another regexp Q

Hello!

I have an  array like this:

"aaadkjfh"
"abcde"
"dskkk"

i want to take out the elements that have 3 same letters together.

so i will be left with "abcde"

Thanks

Yehuda Ernst                        יהודה ארנסט
NDS Technologies Israel Ltd. mailto:yernst at nds.com>
Jerusalem          Tel:  +972 (2) 589-4427
PO Box 23012    Fax: +972 (2) 589-4825
Israel.    91235    Cell  +972 54 5664427

*********************************************************************************************************
This e-mail is confidential, the property of NDS Ltd and intended for the addressee only.  Any dissemination, copying or distribution of this message or any attachments by anyone other than the intended recipient is strictly prohibited.  If you have received this message in error, please immediately notify the postmaster at nds.com and destroy the original message.  Messages sent to and from NDS may be monitored.  NDS cannot guarantee any message delivery method is secure or error-free.  Information could be intercepted, corrupted, lost, destroyed, arrive late or incomplete, or contain viruses.  We do not accept responsibility for any errors or omissions in this message and/or attachment that arise as a result of transmission.  You should carry out your own virus checks before opening any attachment.  Any views or opinions presented are solely those of the author and do not necessarily represent those of NDS.

NDS Limited Registered office: One Heathrow Boulevard, 286 Bath Road, West Drayton, Middlesex, UB7 0DQ, United Kingdom. A company registered in England and Wales  Registered no. 3080780   VAT no. GB 603 8808 40-00

To protect the environment please do not print this e-mail unless necessary.
**********************************************************************************************************

_______________________________________________
Perl mailing list
Perl at perl.org.il
http://perl.org.il/mailman/listinfo/perl



More information about the Perl mailing list