package SQLiteTest::LoaderTest1; use strict; sub dat_double { shift->dat x 2 } 1;