$_ = <INPUT>;
m/.*?\(([\d\.\:]*)\).*?\(([\d\.\:]*)\)(.*)/;
( $2 =~ m/:/ ) && ( $mine{$1} = ($2 eq $mybox) ) ;
( $2 =~ m/^\d+$/ ) && $mine{$1} && print $3;