for ($i=1; $i<=3; $i++) {
open $input1, '<', "$path\/File-$molec1-cluster$i.out" or die $!;
push @ARGV, "$path\/File-$molec1-cluster$i.out";
for ($j=2; $j<=3; $j++) {
open $input2, '<', "$path\/File-$molec2-cluster$j.out" or die $!;
push @ARGV, "$path\/File-$molec2-cluster$j.out";
I don't understand why this pattern appears...?
Hi, it does look odd. The only thing I see is missing } sub-ending brackets in your code,
maybe that missing sub closure is important. As always, a small-self-contained working
example would be useful here. Because usually, when you need to make an example,
you see the error yourself.