[Omaha.pm] bug hunt

[Jay Hannah <jay@jays.net>]

Code:

my $w1=$original_when;
my $w1=~s/[\s:-]//;



Jay asserts:

That can't be right. The second line uses "my" again, which wipes out  
the assignment from the first line. So $w1 will always be undef, and  
those two lines of code could be reduced to a single line: "my $w1;".



Doh!   :)

j