Putting sample of Perl
Fixing bug: resolve identation

Signed-off-by: Lucas Kanashiro <lucas-kanashiro@hotmail.com>
Signed-off-by: Victor Cotrim <cotrim149@gmail.com>
Merge pull request #8 from cotrim149/bxref

Bxref - adding sample of perl