package whatever; sub log { # do logging } sub calculate_something { # do calculations } return 1; # Perl insists on this :-)