package Test; use DBI; sub return1 { return 1; } 1;