[MacPerl-AnyPerl] Pattern matching question

[Adam Witney]

Hi,

I am trying to write a simple regex to strip out some text, here is some
sample code

$string = '[EC:<stuff>] [SP:<stuff>]';

if($string =~ m/\[(EC:.+)\]/)
   {
    print $1
   }


However this returns

EC:<stuff>] [SP:<stuff>

Instead of

EC:<stuff>

Basically I want to strip out the contents of the first [], but this seems
to be matching from the outside in. Is there a way to make it look for the
first ] after the [ ?

Thanks for any help

adam