my @array = (1,2,3); sub a { ... }; sub b { ... };