Mine

my %meeting = cleanMeetingData(%rawMeeting, $verbose);

sub cleanMeetingData {
    my (%rawMeeting, $verbose) = @_;

    { local $| = 1; print "Cleaning meeting data... "; }
}