$ { echo -1,2,3,4,5,6
        echo -1,2,4,0,0,9
        echo  0,0,0,4,3,2
      } | perl pm-patterns.pl

    line 1 matches pattern 1
    line 1 matches pattern 2
    line 3 matches pattern 3