Permalink
Browse files

Yes, I'm in Norway now :)

git-svn-id: svn://localhost:81/cpan/perl5-device-gsm/trunk@239 16b0436d-b983-6540-bd0b-04945bd77856
  • Loading branch information...
1 parent f9c07da commit 47267e8ba848d959afa2740c8b13e5d3394be89b @cosimo committed Aug 9, 2008
Showing with 3 additions and 3 deletions.
  1. +3 −3 examples/send_to_cosimo.pl
@@ -52,11 +52,11 @@
#
# My GSM phone number
#
-my $number = '+393289287791';
+my $number = '+4745016680';
my $content =
'From '.$name.";\n".
- 'Device-Gsm v'.$Device::Gsm::VERSION.','."\n".
- 'Device-Modem v'.$Device::Modem::VERSION.','."\n".
+ 'Dev-Gsm v'.$Device::Gsm::VERSION.','."\n".
+ 'Dev-Modem v'.$Device::Modem::VERSION.','."\n".
'on '.$Config{myarchname}.' perl v'.$]."\n".
'Mod:' . ($gsm->manufacturer() || '').'/'.($gsm->model() || '').
' Ver:'. ($gsm->software_version()||''). "\n" .

0 comments on commit 47267e8

Please sign in to comment.