Create perl(fact)
Merge pull request #19 from AntonPozdeev/patch-7

Create perl(fact)