add perl_tab