发送短信 : An introduction to language processing with perl and prolog :