get;say sum map {$/=.split(<<:' '>>);(($2-$0)*60+$3-$1)%1440},lines