package Foo; use strict; use warnings; sub bar { 3 } 1;