$address{$person}; #### if (not $is_seen{$case}++) { # etc #### sub my_function { my %opts = @_; # etc #### my $name = $self->{name}; #### if (exists $handler{$case}) { $handler{$case}->(); # Handle the special case }
## if (not $is_seen{$case}++) { # etc ##
## sub my_function { my %opts = @_; # etc ##
## my $name = $self->{name}; ##
## if (exists $handler{$case}) { $handler{$case}->(); # Handle the special case }