Welcome to my website!
Bold
Italics
A page Another page ENDPAGE pages["/page"]=<<-ENDPAGE
A page
Bold and Italic
Home Another page ENDPAGE pages["/anotherpage"]=<<-ENDPAGEHere is more info
A page Home ENDPAGE currentpage="/" def showtext(text,nline=true) case $mode when "b" puts "\e[1m#{text}\e[0m" if nline print "\e[1m#{text}\e[0m" if !nline when "i" puts "\e[3m#{text}\e[0m" if nline print "\e[3m#{text}\e[0m" if !nline when "ib" puts "\e[1m\e[3m#{text}\e[0m" if nline print "\e[1m\e[3m#{text}\e[0m" if !nline when "" puts text if nline print text if !nline end end def dispelem(elem) if elem.class==Nokogiri::XML::Text showtext(elem) return end case elem.name when "p" elem.children.each do |elem| dispelem(elem) end when "a" $links.push(elem["href"]) showtext(elem.children[0],false) puts "[#{$linkid}]" $linkid+=1 when "b" if $mode=="i" $mode="ib" else $mode="b" end elem.children.each do |elem| dispelem(elem) end $mode="" when "i" if $mode=="b" $mode="ib" else $mode="i" end elem.children.each do |elem| dispelem(elem) end $mode="" end end while true $links=[] $linkid=1 system("clear") doctext=pages[currentpage].gsub("\n","") doc=Nokogiri::Slop(doctext) doc.html.body.children.each do |elem| dispelem(elem) end print "Link ID/exit:" id=gets.chomp!.downcase break if id=="exit" currentpage=$links[id.to_i-1] end