$my( $curr_time, $prev_time ); while( <> ) { $prev_time = $curr_time; $curr_time = ( split /,/ )[1]; }