Відправити по sms: Perl 5 by example :