@Kitonum If we just use fsolve(p) then we get the same roots with just higher number of digits..

Sol := fsolve(P);
-4.1625018447193315710767770357986117490710417022810709182145314\

  39304377155734611001354339389537078516, -2.2951867685569900667\

  73890629621701934813067877763951869550062864381630262269770072\

  635798065390899891, -1.300314687724564848071322737688278517692\

  496374594542224417555132663311328189501791698603368433395344,

  -0.80484304452783800218049668188088194740401109506525872070505\

  40165243605538320400661974621866472476787, -0.0659600850083791\

  92964205554388574969649648559051739304465897021394671878795480\

  12485154735242999631710, -0.0421251077693907791178236036919740\

  83470428423918987604303218818737541377341764003623507367834670\

  32271, 0.04212510776939077911782360369197408347042842391898760\

  430321881873754137734176400362350736783467032271, 0.0659600850\

  08379192964205554388574969649648559051739304465897021394671878\

  79548012485154735242999631710, 0.80484304452783800218049668188\

  08819474040110950652587207050540165243605538320400661974621866\

  472476787, 1.3003146877245648480713227376882785176924963745945\

  42224417555132663311328189501791698603368433395344, 2.29518676\

  85569900667738906296217019348130678777639518695500628643816302\

  62269770072635798065390899891, 4.16250184471933157107677703579\

  86117490710417022810709182145314393043771557346110013543393895\

  37078516

@Kitonum Thanks man.. But these all are very negligible roots...They are of the power of 10^-59 etc..They have near to zero value...