Small and Large Stones of Programming http://www.kanadas.com/program-e/ ja Copyright 2008 Sun, 30 Mar 2008 22:19:36 +0900 http://www.sixapart.com/movabletype/ http://blogs.law.harvard.edu/tech/rss Simple mail proxy by Perl Mail proxies (SMTP proxies) have become much more important to avoid errorneous mail delivery. There is a mail proxy written by Perl: Qsmtpd. However, when you want to build a simple proxy by yourself, this program might not be helpful because the program is too much complicated. So I wrote a proxy, which is as simple as possible.

]]> http://www.kanadas.com/program-e/2008/03/simple_mail_proxy_by_perl.html http://www.kanadas.com/program-e/2008/03/simple_mail_proxy_by_perl.html Network and communication Sun, 30 Mar 2008 22:19:36 +0900 Receiving and playing linear voice (VoIP) using Perl A program that receives a two-channel (i.e., stereo) voice by RTP (Real-time Transport Protocol) and that plays by audio. The sound is 16-bit linear by default, but u-Law (G.711) or other codecs can be used. The port number used for receiving the voice is specified in the program (i.e., $IN_PORT_RTP)． A detailed description will be given in future, but it will be explained when it becomes necessary.

]]> http://www.kanadas.com/program-e/2007/11/receiving_and_playing_linear_v.html http://www.kanadas.com/program-e/2007/11/receiving_and_playing_linear_v.html Network and communication Fri, 16 Nov 2007 01:02:10 +0900 Recording and sending linear voice using Perl A Perl program that sends a voice stream using RTP (Real-time Transport Protocol) is show below. The default codec for input voice is 16-bit linear, but u-Law (G.711) and some other codecs can be used. The port numbers and the IP address of the receiver are specified in this program ($REMOTE_PORT_RTP, $LOCAL_PORT_RTP, $ip, etc.). RTCP (Real-Time Control Protocol) can also be handled, but no specific control is intended. A detailed description will be given in future, but it will be explained when it becomes necessary.

]]> http://www.kanadas.com/program-e/2007/11/record_and_play_linear_voice_u.html http://www.kanadas.com/program-e/2007/11/record_and_play_linear_voice_u.html MultiMedia Fri, 16 Nov 2007 00:40:07 +0900 Purpose of this blog The purpose of this "blog" is to introduce my programming tips.

]]> http://www.kanadas.com/program-e/2007/11/purpose_of_this_blog.html http://www.kanadas.com/program-e/2007/11/purpose_of_this_blog.html Miscellaneous Fri, 16 Nov 2007 00:34:18 +0900 A program that "kicks" a UDP port using Perl When connecting multiple computers to a network and making the computers communicate each other through the network, it is convenient to start the communication by kicking a port of the application on one of the computers. For this purpose, I wrote a program that sends a UDP (User Datagram Protocol) message that has no content. (It is easy to replace UDP by TCP, but the receiver program will be a little more complicated.)

]]> http://www.kanadas.com/program-e/2007/11/a_program_that_kicks_a_udp_por_1.html http://www.kanadas.com/program-e/2007/11/a_program_that_kicks_a_udp_por_1.html Network and communication Fri, 16 Nov 2007 00:25:37 +0900 Simplified XML interface using Perl -- conversion of table-style data representation between hash and XML A good method for building exact XML interface is use XML API. However, it is easier to use Perl's pattern macth function to create a simpler XML (like) interface. In an exact XML interface, a text line may contain any number of tags, and a content enclosed by a beginning and ending tags. However, if we can add a restriction to this syntax, we can handle XML documents in an easier method. Such a simplified XML processing might not be encouraged, but it is convenient when building a simple prototype.

]]> http://www.kanadas.com/program-e/2007/11/simplified_xml_interface_using.html http://www.kanadas.com/program-e/2007/11/simplified_xml_interface_using.html String Fri, 16 Nov 2007 00:23:13 +0900 Perl database (tie) generation from text A simplified database can be handled easily using tie() of Perl, instead of using heavy-duty databases such as relational databases. When using tie(), hashes can be tied to an external database and the hashes can be permanent. However, in contrast to heavy-duty databases, it is not possible to write to the database in parallel and the performance is probably lower. So it is suited for prototypes but not suted for real use.

Microsoft Excel is often used when creating a data group such as a database or data to be entered to a database. So, we often want to enter data created by Excel or another program, for example, by outputting it to a tab-separated text. The following program is an example for such task.

]]> http://www.kanadas.com/program-e/2007/11/perl_database_tie_generation_f.html http://www.kanadas.com/program-e/2007/11/perl_database_tie_generation_f.html Database Fri, 16 Nov 2007 00:21:44 +0900 Circular layout of radio buttons to a Web page using Perl Sometimes it is necessary to layout radio buttons freely on a Web page. I once performed an experiment, in which I asked the human subjects to answer the sound direction and distance after hearing a spatialized sound. For this purpose, I used a Web page that contained radio buttons. The subjects answered by clicking one of the buttons. This method enables free layout of buttons, e.g., circular or any other layout, but the layout must be decided carefully not to overlay them with other contents. So, when it is possible to layout the buttons in an easier method, for example by a table, this method should not be used.

]]> http://www.kanadas.com/program-e/2007/11/circular_layout_of_radio_butto_1.html http://www.kanadas.com/program-e/2007/11/circular_layout_of_radio_butto_1.html Web Fri, 16 Nov 2007 00:20:29 +0900