projects
/
harlon.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Add harlon into version control.
[harlon.git]
/
src
/
grammar.pl
1
#!/usr/bin/env perl
2
use strict;
3
use warnings;
4
5
my %grammar = (
6
"quit" => "v_quit",
7
"eat object" => "v_eat",
8
"eat the object" => "v_eat",
9
"shoot object" => "v_shoot",
10
"take object" => "v_take",
11
"give object to object" => "v_give",
12
);
13
14
my %foo = (
15
"v_take" => { find => 'takebit', },
16
"v_shoot" => { pre => 'pre_shoot', },
17
);