how can i send instant message to to yahoo with a form and socket programming

Don't know that you can do it directly. However, there is a project on FM that may point you in the right direction.

http://laffer.sourceforge.net/

It talks of using the Yahoo - via the modified Net::YahooMessenger module to connect to Yahoo from Perl. If you can make that work then you should be on your way to making it happen. (Of course you will need a YaHoo account for the service)

HTH,

=C=