Re^4: Looking for series in consecutive lines of a file

I see you're trying not to overwhelm the new guy, but introducing "use constant" and not introducing subroutine arguments, references? Eeew :)

...
display_series( \%series );
...
display_series( \%series );
...

sub display_series
{
    my( $series ) = @_;
    
    if ($series->{depth} >= MIN_DEPTH)
    {
        print join(',', $series->{name}, $series->{start}, $series->{e
+nd},
                        $series->{end} - $series->{start} + 1), "\n";
    }
}
[download]

Comment on Re^4: Looking for series in consecutive lines of a file Download Code

Replies are listed 'Best First'.
Re^5: Looking for series in consecutive lines of a file by mbp (Novice) on Feb 17, 2015 at 23:16 UTC
Anonymous Monk, haha, yes I do have a ways to go, but thanks for your addition!	[reply]