Eliminating Redundant Variables ... a Surprise!

Several of my variables were present only to enable me to penetrate the line noise endemic to Perl's multi-dimensional data structures.

        my %week           = %{$period};
        my %group_week     = %{$v};
        my %all_group_week = %{$v};

Once I decided to eliminate these synthetic variables and put up with some line noise, I discovered that my two new subroutines were identical!

Previous Back to start of show Next
Slide: 9 surprise © 2003 James E. Keenan