Add perl variant