my $sec=$values[2]; $sec+=$values[1]*60; $sec+=$values[0]*3600;