'speed_up',
{ field => 'ip_addr', value => \&ip_addr },
{ field => 'sectornum', value => \§ornum },
- 'mac_addr',
+ { field => 'mac_addr', value => \&mac_addr },
#'latitude',
#'longitude',
{ field => 'coordinates', value => \&coordinates },
$out;
}
+sub mac_addr {
+ my $svc = shift;
+ join(':', $svc->mac_addr =~ /../g);
+}
+
sub usergroup {
my $svc = shift;
my $usergroup = $svc->usergroup;