aaahh, 8-)  , the many ways of PERL !!!

Sebastian Proost wrote:
Esther-Kristin Lather schreef:
  
Hi!

How can I make this Regex greedy?

my ($seq) = ($var =~m/^(.*_{0,1}\d+)\s.*/);

if $var is "ara_prot.tfa_3154 | AT1G26170.1 | no family",
I want to cut after the first whitespace
so that $seq becomes be "ara_prot.tfa_3154" and not "ara_prot.tfa_3154 | 
AT1G26170.1".

I don't know where/ how to include the ? for non-greedy search. I would 
want to do it with round brackets, but that violates the round brackets 
I already use for getting a part of the string, no?

Thanks for any suggestions!
Esther.
_______________________________________________
Binari Implicitly Neglects All Recursive Iterations
https://maillist.psb.ugent.be/mailman/listinfo/binari

  
    
use split ;)

  

-- 
==============================================================
Lieven Sterck, PhD

Tel:+32 (0)9 3313821                       Fax:+32 (0)9 3313809
VIB Department of Plant Systems Biology, UGent
Bioinformatics and Evolutionary Genomics Division
Technologiepark 927,         B-9052 Gent,             Belgium
Email: lieven.sterck@psb.vib-ugent.be
Website: http://bioinformatics.psb.ugent.be

==============================================================
"Facts are meaningless. You could use facts to prove anything 
that's even remotely true!" H. Simpson