Perl regexp

Пытаюсь отпарсить параметры извлеченные из URL
Например:

param1=1&param2=2&param3

использую такое выражение

(&|^).*(=|&|$)

но в результат попадает вся строка
хотя если логически проанализировать то должно было быть так:

^param1=

&param2=

&param3$

знаю что не в эту ветку вопрос, но здесь сейчас тусуют все прогеры

UPD.: обошлось без регулярок вовсе

Code:

        p.l=CountString(params,"&")
        For i=1 To p+1
          str=StringField(params,i,"&")
          If FindString(str,"=")
            param=StringField(str,1,"=")
          Else
            param=str
          EndIf
        Next i