Regular Expression Perl

  1. Home
  2. Perl
  3. Regular Expression
  4. Clustering and anchors
while(){
    # print if /^A|B/;
    print if /^(S|B)/;
}
__DATA__
    S B
    B B
    A C
    N C
    J D
    K E