symbian/ext/Moped/Msg/location.pl


1
2
3
4
5
6
7
8

use Moped::Msg;
my ($MCC, $MNC, $LAC, $Cell) =
  Moped::Msg::get_gsm_network_info();
print "MCC  = $MCC\n";
print "MNC  = $MNC\n";
print "LAC  = $LAC\n";
print "Cell = $Cell\n";