No data found for perl dbi 'dynamic result sets'