Parent Directory | Revision Log | Patch
revision 871 by dpavlin, Wed Dec 17 17:59:59 2008 UTC | revision 874 by dpavlin, Wed Dec 17 18:38:49 2008 UTC | |
---|---|---|
# | Line 50 sub as_sponge { | Line 50 sub as_sponge { |
50 | warn "# pos: ", $self->dump( @pos ); | warn "# pos: ", $self->dump( @pos ); |
51 | my @l = split(/\s+/,$_); | my @l = split(/\s+/,$_); |
52 | warn "# l: ", $self->dump( @l ); | warn "# l: ", $self->dump( @l ); |
53 | $l[0] =~ s{00:00:0\d}{time} || die "can't locate time column in header"; | $l[0] =~ s{\d\d:\d\d:\d\d}{time} || die "can't locate time column in header"; |
54 | @name = @l; | @name = @l; |
55 | next; | next; |
56 | } elsif ( @pos ) { | } elsif ( @pos ) { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |