Adding sample for perl: folder person.
Fixing global variables bug.

Signed-off-by: Bryan de Holanda Fernandes <bryan.h.fernandes@hotmail.com>
Signed-off-by: Victor Cotrim <cotrim149@gmail.com>