print "First connected component == $subgraphs[1]\n";
print "Number of connected components== $#subgraphs\n";