Meta tags:
Headings (most frequently used words):
-
Text of the page (most frequently used words):
url (37), shortenurl (16), irssi (16), reader (14), data (13), server (9), http (8), return (8), msglevel_crap (8), length (7), our (7), tags (7), sub (7), witem (7), use (6), print (6), writer (6), close (6), shortenurl_autoconvert_minlen (5), maxlength (5), idx (5), window (5), usage (4), and (4), version (4), signal_add_last (4), agent (4), active (4), cache (4), time (4), hash (4), printformat (4), new (4), pid (4), request (4), derwan (3), index (3), file (3), command_bind (3), active_win (3), sprintf (3), shortenurl_url_show (3), elsif (3), else (3), url2short (3), content (3), do_shortenurl (3), test (3), do_setup (3), marcin (2), greater (2), than (2), converted (2), for (2), service (2), lwp (2), useragent (2), posix (2), _exit (2), settings_add_int (2), settings_get_int (2), theme_register (2), name (2), changed (2), active_max (2), shortenurl_connect (2), while (2), shortenurl_url_error (2), cannot (2), window_item_find (2), unless (2), command (2), fork (2), do_fork (2), buf (2), shift (2), who (2), where (2), winname (2), message (2), ycki, settings, then, link, will, automaticaly, simultaneously, there, can, three, links, special, thanks, piotr, kucharski, beeth, changes, which, made, communication, between, script, web, easier, strict, vars, authors, rozycki, contact, description, license, gnu, gpl, sat, jun, cest, 2004, shortenurl_url_list, secs, ago, shortened, connecting, this, may, take, connect, too, high, not, 02x, ord, unpack, exists, pipe, pidwait_add, input_add, fileno, input_read, tag, defined, get, auto, substr, input_remove, server_find_tag, undef, delete, ftp, https, foreach, last, next, unshift, public, private, setup, misc,
Text of the page (random words):
shortenurl pl v 0 7 1 by marcin r ycki derwan irssi pl usage shortenurl url shortenurl l shortenurl index settings shortenurl_autoconvert_minlen length if shortenurl_autoconvert_minlen is greater than 0 and length of url is greater than shortenurl_autoconvert_minlen then link will be converted automaticaly simultaneously there can be three links converted special thanks to piotr kucharski beeth for changes in 42 pl url service which made communication between script and web easier use strict use vars qw version irssi use lwp useragent use posix _exit use io file use irssi qw command_bind version settings_add_int settings_get_int signal_add_last theme_register active_win version 0 7 1 irssi authors marcin rozycki contact derwan irssi pl name shortenurl description shortenurl license gnu gpl v2 url http derwan irssi pl changed sat jun 26 19 17 02 cest 2004 our agent sprintf irssi s version our active 0 our active_max 3 our url our tags our cache our maxlength 0 theme_register shortenurl_url_list _ 0 _ url _ 1 _ by 2 3 4 secs ago shortenurl_url_show shortened url 0 _ 1 _ shortenurl_connect connecting to http 42 pl url this may take a while shortenurl_url_error cannot connect to http 42 pl url service sub shortenurl my data server witem _ witem server window_item_find 1 if data s w s s s witem active_win unless witem if data l i my time time for my idx 0 idx 0 url idx 1 url idx 2 time url idx 3 return elsif data m d if my url url data server command shortenurl url 0 else irssi print shortenurl index too high msglevel_crap return elsif not data irssi print usage shortenurl url msglevel_crap irssi print usage shortenurl l msglevel_crap irssi print usage shortenurl index msglevel_crap return my url data url s w sprintf 02x ord 1 ge my hash unpack h url if exists cache hash witem printformat msglevel_crap shortenurl_url_show url2short data cache hash return return if active active_max my reader io file new or return my writer io file new or return pipe reader writer my pid fork if pid active close writer irssi pidwait_add pid witem printformat msglevel_crap shortenurl_connect tags reader irssi input_add fileno reader input_read do_fork reader server tag witem name elsif defined pid close reader my ua new lwp useragent ua agent agent ua agent my request new http request get http 42 pl url auto 1 url url my s ua request request my content s content my buf content m http s 1 hash data n 0 print writer buf n close writer posix _exit 1 else close reader close writer irssi print cannot fork sub url2short my url shift my length length url substr url 15 length 32 if length 32 0 return url sub do_fork my reader shift my data irssi input_remove tags reader 0 close reader my server irssi server_find_tag tags reader 1 my window server server window_item_find tags reader 2 undef tags reader delete tags reader active window active_win unless window if data m window printformat msglevel_crap shortenurl_url_show url2short 3 1 cache 2 1 else window printformat msglevel_crap shortenurl_url_error sub do_shortenurl my server data who where winname _ while data m http ftp https s g my test url 0 1 server command sprintf shortenurl w s s winname url if url m http 42 pl url and maxlength 0 and length url maxlength foreach my u url test 1 last if u 0 eq url next if test unshift url url who where time url 9 if url 9 sub do_setup maxlength settings_get_int shortenurl_autoconvert_minlen command_bind shortenurl shortenurl command_bind 42 pl shortenurl signal_add_last message public sub do_shortenurl _ 0 _ 1 _ 2 _ 4 _ 4 signal_add_last message private sub do_shortenurl _ 0 _ 1 _ 2 _ 3 _ 2 signal_add_last setup changed do_setup settings_add_int misc shortenurl_autoconvert_minlen maxlength do_setup
|