All pastes #485627 Raw Edit

Something

public text v1 · immutable
·published 2007-05-13 03:26 UTC
rendered paste body
alias urban { 
  sockclose urban 
  sockopen urban urbandictionary.com 80 
  sockmark urban $1
} 




on *:sockopen:urban:{ 
  if ($sockerr) { echo -a THERE WAS AN ERROR YOU FAGGOT | return } 
  sockwrite -n $sockname GET /define.php?term= $+ $sock($sockname).mark $+ &r=f HTTP/1.1
  sockwrite -n $sockname Host: www.urbandictionary.com
  sockwrite -n $sockname Accept: */*
  sockwrite -n $sockname
} 


on *:sockread:urban:{ 
  var %t
  sockread %t 
  if ($regex(htmlfree,%t,/<p>(.*)<\/p>/)) { 
    if ($htmlfree($regml(htmlfree,1)) ) { say $htmlfree($regml(htmlfree,1)) }
  }
} 
alias htmlfree {
  var %htmlfree = $1
  .say  -------------------
  return $replace(%htmlfree,&quot;,",&amp;,&)
}