Help for this page
#!/bin/perl -w use strict; foreach( <DATA>) ... 1_ab1c/22_deg/bla_30_31_blah 1_a2b33c/22_deg/bla_30_31_blah a_ab1c/b_deg/bla_30_31_blah