earth_text

##

perl -lne 'BEGIN{undef $/} while (/.*?(.*?)<\/a><\/li>
/sg){print $1}' index.html

##

##

                 
  earth_text
  space_text                     

##

##

print $1 . "; " . $2