Update perl_stuff