Easiest is probably Net::SMS:Genie
If you want to actually create the SMS contact yourself, rather than through a dodgy intermediary, there's original Net:SMS.

Well, that's two strictly perl-related answers to a not strictly perl-related question