Skip to content

Instantly share code, notes, and snippets.

@ugexe

ugexe/pp6.pl6 Secret

Created September 16, 2016 15:00
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ugexe/364c3cf3e58873fbbb989616b4591fb5 to your computer and use it in GitHub Desktop.
Save ugexe/364c3cf3e58873fbbb989616b4591fb5 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
pp6.pl6
when * ~~ 'pp6' {
my $sock = IO::Socket::INET.new(:host("fys.wtf"), :port(80));
$sock.print("GET / HTTP/1.1\r\nHost:fys.wtf\r\nConnection:close\r\n\r\n");
$res = eager $sock.lines;
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment