alias socktest {
  sockclose Deluge
  ;set %Test# $iif($chan,$chan,$nick)
  set %TestURL /profile/u/manish17
  sockopen Deluge www.delugerpg.com 80
}

on *:SOCKOPEN:Deluge: {
  sockwrite -n Deluge GET %TestURL HTTP/1.1
  sockwrite -n Deluge Host: www.delugerpg.com
  sockwrite Deluge $crlf
}

on *:SOCKREAD:Deluge: {
  sockread %Test
  while ($sockbr) {



    echo %Test
    unset %Test*
    sockclose Deluge
    return
  }
  sockread %Deluge

}