- foreach $symname (sort keys %$package) {
- local *sym = $$package{$symname};
- next unless (defined %sym);
- next unless ($symname =~ /::/);
- next if ($symname eq 'main::');
+ foreach $symname ( sort keys %$package ) {
+ local *sym = $$package{$symname};
+ next unless ( defined %sym );
+ next unless ( $symname =~ /::/ );
+ next if ( $symname eq 'main::' );