- if (length $message > 140){
- $c->reply("Message is too long");
- return;
- }
- if ($number =~ /^\+([1-9]\d+)$/){
- $number = $1;
- }else{
- my ($sms) = $dbh->selectrow_array(q{
-SELECT sms FROM users WHERE username ilike $1
- AND uid IN (SELECT uid FROM groupmembers WHERE gid = 'M')
- },undef,$number);
- $sms //= 'No number, or invalid user';
- if ($sms =~ /^\+([1-9]\d+)$/){
+ if (length $message > 140){
+ $c->reply("Message is too long");
+ return;
+ }
+ if ($number =~ /^\+([1-9]\d+)$/){