PasteSite.Com

Recent Pastes

Sign Up!

PasteSite is open to the public, but with limited features. Register to be able to modify access rights, track your pastes and more...

Change the theme

If you prefer reading light text on a dark background to dark text on a light background, then you might want to try the dark theme.

This paste is a reply. View the Previous Paste?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26

alias titlegrabber {
  inc %title
  set %link $1
  sockopen title. [ $+ [ %title ] ] mac4.site90.com 80
} 
on *:SOCKOPEN:title.*: {
  sockwrite -nt $sockname GET /title.php?s= $+ %link HTTP/1.1 
  sockwrite -nt $sockname Host: mac4.site90.com
  sockwrite -nt $sockname $crlf 
} 
on *:SOCKREAD:title.*: { 
  if ($sockerr) { halt } 
  else { 
    var %sockreader 
    if (%sockreader == $null) { echo -a % $+ sockreader is null. }
    else {
      sockread %sockreader 
      echo -a %sockreader
      if (<title>*</title> isin %sockreader) { 
        tokenize 32 %sockreader 
        msg $active Title: $1-
        sockclose $sockname 
      } 
    } 
  }
}

Reply to This Paste

(leave blank to make this paste permanent)
(if set as private)