package T; use strict; sub foo { } 1;