give length scalar explicitly for newer perls