Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl -l

...
    print $row->[1] if $match_pattern{$row->[1]};
}
close $in_fh;
  2. or download this
    $ cat pm_1153098_match_csv_lines_input.csv
David@domain.com|David@domain.com|J|ABBASS, DAVID JOHN|
Cory@domain.com|Cory@domain.com|E|ABBOTT, CORY J|
Tania@domain.com|Tania@domain.com|F|ABBOTT, TANIA LEE|
Geoffrey@domain.com|Geoffrey@domain.com|N|ABBOTT, GEOFFREY BRYAN|
  3. or download this
    $ cat pm_1153098_match_csv_lines_pattern.txt
Randall@domain.com
David@domain.com
Rob@domain.com
Tania@domain.com
  4. or download this
    $ pm_1153098_match_csv_lines.pl
David@domain.com
Tania@domain.com