Skip to content

Instantly share code, notes, and snippets.

View zoffixznet's full-sized avatar
💭
😂

Zoffix Znet zoffixznet

💭
😂
126 followers · 106 following
View GitHub Profile
@zoffixznet
zoffixznet / bot.p6
Created December 3, 2015 13:43
my ( $nick, $channel ) = 'P6NotABot', '#perl6-recon';
await IO::Socket::Async.connect('irc.freenode.net', 6667).then({ given .result {
.print(qq:to/END/
NICK $nick
USER $nick $nick irc.freenode.net :Really not a bot
JOIN $channel
END
);
react { whenever .chars-supply { .say } }
}});
@zoffixznet
zoffixznet / gist:d2ea6977bc8430328310
Last active December 4, 2015 17:35
test1
test
fsdfsd
fsd
f
dfsd
fsd
@zoffixznet
zoffixznet / grammar.p6
Created December 5, 2015 17:50
use v6;
use Grammar::Tracer;
grammar IRC::Grammar:ver<1.001001> {
token TOP { [ <message> \r\n ]+ }
token message { [':' <prefix> ' '+ ]? <command> <params> }
token prefix { [<servername> | <nick>] [ '!' <user> ]? [ '@' <host> ]? }
token command { <letter>+ | <number>**3 }
token params { ' '* [ ':' <trailing> | <middle> <params> ]? }
token middle { <-[: \0\r\n]> <-[ \0\r\n]>+ }
token trailing { <-[\0\r\n]>+ }
@zoffixznet
zoffixznet / gist:7726683de71683a9ac08
Created December 5, 2015 17:51
TOP
| message
| | prefix
| | | servername
| | | * MATCH "ZoffixW!~ZoffixW\@unaffiliated/zoffix"
| | * MATCH "ZoffixW!~ZoffixW\@unaffiliated/zoffix"
| | command
| | | letter
| | | * MATCH "J"
| | | letter
@zoffixznet
zoffixznet / grammar.p6
Created December 5, 2015 17:51
use v6;
use Grammar::Tracer;
grammar IRC::Grammar:ver<1.001001> {
token TOP { [ <message> \r\n ]+ }
token message { [':' <prefix> ' '+ ]? <command> <params> }
token prefix { [<servername> | <nick>] [ '!' <user> ]? [ '@' <host> ]? }
token command { <letter>+ | <number>**3 }
token params { ' '* [ ':' <trailing> | <middle> <params> ]? }
token middle { <-[: \0\r\n]> <-[ \0\r\n]>+ }
token trailing { <-[\0\r\n]>+ }
@zoffixznet
zoffixznet / gist:9f64995f16faa6fc7925
Created December 5, 2015 18:33
use v6;
# use Grammar::Tracer;
grammar IRC::Grammar:ver<1.001001> {
token TOP { [ <message> \n ]+ }
token message { [':' <prefix> ' '+ ]? <command> <params> }
token prefix { [<servername> | <nick>] [ '!' <user> ]? [ '@' <host> ]? }
token command { <[a..zA..Z]>+ | <[0..9]>**3 }
token params { ' '* [ ':' <trailing> | <middle> <params> ]? }
token middle { <-[:\ \0\r\n]> <-[\ \0\r\n]>+ }
token trailing { <-[\0\r\n]>+ }
@zoffixznet
zoffixznet / gist:629e13e0214cc6e3e2e2
Created December 5, 2015 18:44
use v6;
use Grammar::Debugger;
grammar IRC::Grammar:ver<1.001001> {
token TOP { [ <message> \n ] }
token message { [':' <prefix> ' '+ ]? <command> <params> }
token prefix { [<servername> | <nick>] [ '!' <user> ]? [ '@' <host> ]? }
token command { <[a..zA..Z]>+ | <[0..9]>**3 }
token params { ' '* [ ':' <trailing> | <middle> <params> ]? }
token middle { <-[:\ \0\r\n]> <-[\ \0\r\n]>+ }
token trailing { <-[\0\r\n]>+ }
@zoffixznet
zoffixznet / parser.p6
Created December 5, 2015 20:14
use v6;
# use Grammar::Tracer;
grammar IRC::Grammar:ver<1.001001> {
token TOP { <message>+ }
token SPACE { ' '+ }
token message { [':' <prefix> <SPACE> ]? <command> <params> \n }
token prefix { <servername> | <nick> ['!' <user>]? ['@' <host>]? }
token servername { <host> }
token nick { <letter> [ <letter> | <number> | <special> ]* }
token user { <-[\ \0\r\n]>+ }
@zoffixznet
zoffixznet / irc-parser.p6
Created December 5, 2015 20:59
use v6;
grammar IRC::Grammar:ver<1.001001> {
token TOP { <message>+ }
token SPACE { ' '+ }
token message { [':' <prefix> <SPACE> ]? <command> <params> \n }
token prefix {
[ <servername> || <nick> ['!' <user>]? ['@' <host>]? ]
<before <SPACE>>
}
token servername { <host> }
@zoffixznet
zoffixznet / g.p6
Created December 6, 2015 19:08
use v6;
grammar IRC::Grammar:ver<1.001001> {
token TOP { <message>+ }
token SPACE { ' '+ }
token message { [':' <prefix> <SPACE> ]? <command> <params> \n }
token prefix {
[ <servername> || <nick> ['!' <user>]? ['@' <host>]? ]
<before <SPACE>>
}
token servername { <host> }