Select Code to Download

$ cat pm_1077685_A.txt
Line 1: no plate info
...
Line 1: no plate info
Line 2: ... PlateID 000 ...
Line 4: no plate info

#!/usr/bin/env perl

...
        }
    }
}

$ pm_example.pl
Processing: './pm_1077685_A.txt'
...
    Line 2: ... PlateID 000 ...
        Process PlateID '000' from './pm_1077685_C.txt'
    Line 4: no plate info