Error of overloaded,no overloaded

Hello everyone,

Would you please tell ma, what is the following error mean?how i can correct my script?

Script:

             my \\\$atomCounter=0;

              my \\\$Totalforce=0;

              my \\\$bonds = \\\$doc->Bonds;

              foreach my \\\$bond (@\\\$bonds) {{++\\\$atomCounter}

                    my \\\$atom1=\\\$bond->Atom1;

                    my \\\$atom2=\\\$bond->Atom2;

                 if((\\\$atom1->ElementSymbol eq "C") && (\\\$atom1->Style eq "CPK") && (\\\$atom2->ElementSymbol eq "C")){

                      my \\\$force=\\\$atom1->Force;

                      \\\$Totalforce= \\\$Totalforce+\\\$force;                   

                       #printf "%s %s %f\\n", \\\$atom1->Style,\\\$atom1->ElementSymbol, \\\$force;

                      }

                 else{ if((\\\$atom2->ElementSymbol eq "C") && (\\\$atom2->Style eq "CPK") && (\\\$atom1->ElementSymbol eq "C")){

                      my \\\$force=\\\$atom2->Force;

                      \\\$Totalforce= \\\$Totalforce+\\\$force;                  

                      printf "%s %s %f\\n", \\\$atom2->Style,\\\$atom2->ElementSymbol, \\\$force;

                      }               

                  }                                            

            } 

Error:

   Operation "+": no method found,

      left argument has no overloaded magic,

      right argument in overloaded package Cfx::COM at

Best Regard

SJN