perlexperiment: mark :pop layer as accepted