($A,$B)=glob<>;
$A%=12;
$C=$A*60*60+$B*60;
($t=$_*60*60*12/11-$C)>=0&&exit!print$t|0,$/for 0..11