print $self->{file_handle} "some text \n" ;