Atom charge

Hi everyone,

I want to print every atom's charge of a molecular,but only print 500 atoms' and the molecular have 602 atoms all. Why this happened?Thanks.

my \\\$doc = \\\$Documents{"3D Atomistic.xsd"};

foreach my \\\$atom (@{\\\$doc->Atoms}){

printf "Charge on atom %s = %.2f  ", \\\$atom->Name, \\\$atom->Charge;

}

/Jordon