open(FH,"1"); map { s/^[^.]*\.// && print; } ();