perl interface fixes