Select Code to Download

# Count number of atoms
    
...
    }
}
close *ARGV; ## Add this.

@a = 1 .. 10;
$a[0] = 1;
...
...
$a[8] = 9;
$a[9] = 10;

# Calculate distance between all atom coordinates

...
    
    }
}