perl: Fix namespace in example