Select Code to Download

1234567890x.las
1234567890x1.las
1234567890x2.las

#!/usr/bin/perl -w

use strict;
...
        
        $counter = 0;
}

#!/usr/bin/perl -w

use strict;
...
       return 1;
    }
}

my @files2  = glob("$dir2/*.las");

while (<$loc_dir*$from>) {