Отправить по sms: Perl: