Select Code to Download

$_ = "candies lift me up";
s/(cand(y|ies)|lift(s|) (me|us) up)/1 $1; 2 $2; 3 $3; 4 $4;\n/g;
...

1 candies; 2 ies; 3 ; 4 ;
 1 lift me up; 2 ; 3 ; 4 me;